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CHAPITRE 1 PREFACE 


Lorsque nous avons reçu la proposition d'écrire ce livre, nous y 


avons répondu avec enthousiasme. 


Cet enthousiasme n’a fait que grandir lorsque nous avons connu les 
premières données techniques de notre nouvel ordinateur. Les 
premières heures que nous avons passé à essayer cet ordinateur 
quand nous l'avons reçu ont pleinement confirmé notre attente. 

Après Un certain temps passé à l'utiliser, 11 nous est apparu 
évident que cet ordinateur était bien celui que beaucoup 


attendaient. 


11 convient en effet également au lycéen, au mathématicien, au 
débutant, à l'expert, aux personnes AÂintéressées par Un Usage 
commercial, aux programmeurs BASIC, aux fanas de graphisme ou de 


son, etc... 


Son large champ d'applications se reflète d'ailleurs dans la 
diversité des thèmes abordés dans ce livre. Pour bien montrer 
qu’il ne s'agit pas de possibilités théoriques, nous avons enrichi 
le texte d’un grand nombre de programmes d'exemple prêts à 


tourner. 


Le seul conseil que nous souhaîtions vous donner avant que vous ne 
commenciez la lecture de cet ouvrage est de ne pas oublier qu’un 
ordinateur doit être Un bon camarade et qu'il vous sera 


reconnaissant si Vous le manipulez avec soin! En ce qui nous 


concerne, nous n'avons pas eu de problème pendant tout le temps 


que nous nous en sommes servi. 


Les auteurs 


CHAPITRE 2 LE GRAPHISME 


2.1 INTRODUCTION 


Le graphisme est un des aspects les plus fascinants d’un 
ordinateur. C'est pourquoi les concepteurs de votre CPC #64 ont 
accordé une telle importance à la partie graphique de votre 


ordinateur et l'ont doté des caractéristiques suivantes: 


Résolution de 640200 points 

{=12800 points! 

20, 40 ou 80 caractères sur 25 lignes 

16, # ou 8 couleurs pouvant être représentées 
simultanément 

32 couleurs différentes 

Instructions graphiques puissantes 

Technique de fenêtres 

Caractères auto-définis 


Caractères graphiques 


C'est par le développement de leurs possibilités graphiques que 
les ordinateurs sont devenus les instruments Universellement 
utilisés qu'ils sont aujourd’hui. Nous décrirons dans ce chapitre 
les possibilités de Votre CPC dans ce domaine. Nos explications 
théoriques seront toujours illustrées par des exemples pratiques 
mais 11 est bien évident que le meilleur moyen pour vous de 
parvenir à bien assimiler les notions décrites est de réaliser 


vous-même de petits programmes d'exemple et de les tester. 


2.2 LE GRAPHISME HAUTE-RESOLUTION - GRAPHIQUES A CONSULTER 


La résolution est Un terme qu'on emploie pour comparer les 
possibilités graphiques des différents ordinateurs. Pour bien 
comprendre sa signification, reportons-nous au temps où le papier 
et le crayon régnaient encore sur le monde. Il est clair que vous 
pouvez faire des dessins beaucoup plus précis avec un crayon fin 
qu'avec Un crayon à mine très épaisse. De même, plus la résolution 
de votre ordinateur est fine, plus Vous pourrez réaliser des 
graphiques fins et précis. La résolution est en effet le nombre de 
points différents que vous pouvez appeler pour les allumer ou les 
éteindre. Votre CPC offre une grille de 640 points horizontalement 
sur 200 points Verticalement. Vous pouvez donc fixer 12800 points. 
Ceci vous permet donc réellement de réaliser de beaux graphiques: 
courbes de fonction, histogrammes ou graphiques camembert et bien 


sûr aussi des dessins pour des jeux, etc... 


Vous trouverez dans la section suivante quatre programmes 
illustrant les possibilités graphiques de Votre ordinateur. Tapez 
ces programmes et laissez-vous entraîner, simplement en tapant RUN 
dans le monde magique du graphisme. Lorsque vous vous serez lassés 
d'utiliser ces programmes, modifiez-les ou bien créez-en de 
nouveaux, Nous vous conseillons toutefois de bien lire auparavant 


ce chapitre en entier. 


2.2.1 GRAPHIQUES A CONSULTER 


Vous pouvez utiliser les programmes que nous vous présentons dans 
cette section pour créer des graphiques et les regarder où les 


intégrer dans vos propres programmes. 


Le premier programme dessine Un cercle d'après les paramètres 
d'origine, de rayon et de pas. Vous pouvez choisir de faire 
colorier le cercle seulement, ou bien l’intérieur du cercle ou au 
contraire le fond de l'écran. Si le pas est trop grand, il est 
possible que le cercle ou le fond ne soient pas entièrement 


remplis. 


19 MOLE € 
29 INPUT'Origine 6Kkitix 


48 INFUT'"'Origive 


ay 





4@ IHPUT"FaS on cRotir 
SG INPUT"'Pas Foie 
68 IMPUT"'RemPlir ‘F'ond ou ‘C'ercle"iaé 


79 CLS 


89 2201 AND ag" z AND agz"c"i 
94 ORIGIN * 


:4 
184 FOR nel TO : 


6 STEF & 


Lx] 


119 exsex+] 





Se xP fs 
=1 THEH CAM 
sn THEN PLAT 





Z=2 THEN MOVE 6,G:DPAM F4 





230 MO 
24& MC 


254 MOVE cn. @: DRAM 4-48 


VE nA: D ab ne Bu 


ns DEAN id 







eg 


BEA MOVE -n, 4: DRAM 0 4-4@t 


274 HET 


284 a$= 


INKEYS:IF ag="" THEN £86 


234 RUH 


Exemple: Origine (x)=320 
Origine (y)=200 
Rayon =30 
Pas =0.5 


Le deuxième graphique est Un pseudo-graphique en 3 dimensions. 
Suivant l’imagination de chacun, on peut y voir une pyramide vue 
d'en haut, un couloir ou une toile d’araignée. Une modification 


minime du programme suffit à créer une image entièrement nouvelle. 


10 MODE 2 

20 ORIGIN 320,200 

30 FOR t=0 TO 180 STEP 10 
40 PLOT a,t:DRAW t,-a 

SO PLOT-a,t: DRAW-t ,-a 

60 PLOT 180,180:DRAW 0,0 
70 PLOT -180, 180: DRAW 0,0 
80 PLOT a,t:DRAW -a,t 

90 PLOT 180,-1801:DRAW 0,0 
100 PLOT -180,-180:DRAW 0,0 
110 PLOT-t,-a1:DRAW t,-a 
120 a=a+10 

130 NEXT t 


Si vous modifiez par exemple la ligne 30 ainsi: 
30 FOR T=180 TO 0 STEP -10 
vous obtenez déjà une image très différente. Si vous faites 


quelques expériences avec ce programme, vous arriverez à des 


résultats étonnants. 


Le troisième graphique est appelé caléidoscope pour Une raison que 


Vous comprendrez dès que Vous aurez lancé le programme. Ce 
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programme utilise Une fonction de hasard qui permet d'arriver à 


des graphiques très intéressants. 


19 MCE € 
29 DEF FH Fée = INTE RMDE 1 2x )+1 
39 FOR ee TO 4aa STEP FH FÉES à 
























45 :DEAU 46, x 

Sa +: ORAN aGa 

CU *:0 "AU D, 406-%x 

re: D,:x:DRAU 4@0-+, 48 
ES] OT x. G:OFAU ddg-x, 414 
SG FLOT 4Q@,%x:DRAU 9, 4@0-:x 
184 HEXT 

114 LOCATE 935.1 

124 PRENT ENESEES une foisr 
134 Ts: IF a$="" THEN 134 
148 THEH FUH 

isa 





Le quatrième graphique est Une courbe sinusoïdale. Le programme 
vous demande d’indiquer le pas, puis il trace une courbe 
sinuso'idale non pas avec des points, mais avec des lignes qui vont 
d’un point 10,200) au point actuel de la courbe sinusoidale. 
L'image ainsi réalisée est en pseudo 3 dimensions grâce à 


l'illusion optique provoquée par la superposition des lignes. 





149 REM courbe siniscidale 
£a DEG 
SA CLG 
44 IHPUT"Fa 
SE e 
LT 
ra : 
Sa 
3q F 
164 ME“ 
114 28 IHÉE VS: IF a$="" THEN 114 
124 FUH 
Essayez ce programme également avec COSIx}), -COS(x}) ou -SINI x]. 


Bien entendu, ce qu’on appelle l’art informatique n’est pas la 
seule application de la haute résolution de votre CPC. Vous pouvez 


aussi réaliser grâce à Un programme Votre propre blason, le faire 
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éditer sur Une imprimante pour l’accrocher à la porte de votre 
château imaginaire (il y a bien sûr aussi des applications plus 


sérieuses). 


Si vous êtes très axé sur les maths, celà vous sera certainement 
trés utile de pouvoir faire dessiner par votre ordinateur la 


courbe de n'importe quelle fonction. 


Si vous souhaitez Un jour développer Vos propres programmes [par 
exemple des programmes de gestion), la haute résolution vous sera 
très utile pour représenter par exemple les taux de croissance de 


votre affaire au cours des 12 derniers mois. 


Toutes ces applications seraient hors de portée si votre 


ordinateur avait une résolution aussi faible que malheureusement 


la pluspart des autres microordinateurs. 


-12- 


2.2.2 FIGURES LISSAJOUS 


Jules Antoine Lissajous, physicien français qui a vécu de 1822 à 
1880 a étudié le mouvement de particules soumises à des mouvements 
périodiques. 11 a découvert que les corps soumis à de tels 
mouvements se déplacent suivant des courbes différentes. 
Nous avons écrit Un programme qui vous montrera l’apparence qu'ont 
ces courbes. 
Après avoir lancé le programme, Vous devez entrer trois 
paramètres : 
1) Fréquence Y: ce paramètre doît être compris entre 0 et 20 
8} Fréquence X: ce paramètre doit être compris entre 0 et 20 
31 Nombre de pas: cette Valeur indique combien de points doivent 
être tracés. 
19 REM fiaures Lissajous 
£a MODE 4 
38 INPUT'"'Frequence * 
44 IHPUT"Frequence 
29 INHPUT'Hombre de 
6a CLS 
Fa FOR 3x4 TO £X#Fl/s 
8a PLOT 1S5G#SIH6 a#x 


9A MEXT 
14G END 








Commentaire du listing: 


10 Titre 

20 Fixation du mode d'écran 
30 Entrée de la fréquence Y 
0 Entrée de la fréquence X 
50 Entrée du nombre de pas 
60 Vidage de l'écran 


70 Ouverture d’une boucle 
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80 Tracé des points 
90 Fermeture de la boucle 


100 Fin du programme 
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2.3 EDITEUR GRAPHIQUE 


Pour utiliser ce programme, 11 faut que vous aÿez Un joystick 
{manche à balai) compatible avec un ATARI. 

Après avoir lancé le programme, Vous pouvez déplacer sur l'écran 
un petit point, le curseur graphique, au moyen du joystick. Après 
avoir appuyé sur la touche espace, vous pouvez tracer des lignes 
que vous pouvez effacer ensuite en appuyant d’abord sur la touche 
espace puis en passant sur les lignes à effacer avec le curseur 


graphique. Pour effacer l'écran tout entier, appuyez sur la touche 


?C'. Après avoir terminé Votre dessin, Vous pouvez le sauvegarder 
en appuyant sur la touche ’S’'. On vous demande alors le mom du 
dessin et Une fois que Vous l'avez entré, on vous demande 


d'appuyer sur Îles touches "REC" et "PLAY". Le dessin est alors 
sauvegardé bloc par bloc. La sauvegarde terminée, on vous demande 
si vous voulez continuer à dessiner où arrêter le programme. Pour 
charger Une image en dehors de l'éditeur graphique, entrez les 


instructions suivantes: 


10 WINDOW 1,79,24,25:LOAD 


Lancez ce mini-programme avec RUN et Votre image sera chargée. 
Ainsi, le dessin ne sera pas détruit par l'écriture et l'affichage 
des instructions ne se produira que dans les deux dernières lignes 


de l'écran. 


Quand vous aurez fini d'utiliser ce programme, entrez 


l'instruction MODE 2 qui supprimera les fenêtres préalablement 


définies et effacera le dessin. 
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io 4 THEH 54 
:1F 3$=""THEH ra 


Se © 0 © © © D © 


Li AND iozxi 


Jned 1 





AND a%=" “THEN z=1l:GOTO 219 
<= AND a$=" » FE 
" ada"gs" THEN GOT &f 
A IF ag="c" THEW CLG 
A GOTO SE 
FE 
ORIGIN 4, 
4 MTHEOU 
A FETLFEM 
à HIHCOH SHAF 6 
IHPLIT "Horn dix 1 
FEEC HEITE 1 


pa ha pe pa pe pe pe me me te M7 TEA Sa Cl es 
















Hi in ou ‘F'in" 
ETS IF it ATP THEH EUH 
SNS" THEN GOTO SA 
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2.4 PLOTTER DE FONCTIONS 


Le plotter de fonctions est un des auxiliaires les plus précieux 
des mathématiciens mais 11 peut aider n'importe quel lycéen dans 
ses devoirs de maths. Le programme suivant Vous permet d'entrer 
une fonction qui sera plottée dès que Vous aurez entré les 
paramètres X. Le programme vous demande en effet le minimum et le 
maximum X ainsi que le pas. À l’aide de ces paramètres, le maximum 
ou le minimum de la fonction est calculé approximativement de 
façon à dessiner l’axe des Y à l'échelle voulue. Ensuite la 
fonction est dessinée, la partie négative d’abord puis la partie 
positive. Le graphique terminé, le programme attend que vous 


appuyiez sur une touche. 

La fonction utilisée crée Une parabole dont la partie est disposée 
sur l'axe des X. Essayez les Valeurs suivantes: -2 comme minimum, 
+2 comme maximum et 0.1 comme pas. Après un bref temps de calcul 


Vous verrez apparaître Une courbe intéressante. 


Utilisez toujours la lettre X comme variable. 
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1@ REM *XXX##HY FLOTTER CE FONCTIONS #X#4X## 
24 MODE 2 

34 CLERR 

48 DEG 

50 DEF FH fix )=ABSe x"2-1 
60: INPUT "minimum ia 

FQ IHPUT'"'maximunm €" 

84 IHPUT"Pas"ic 

26 IF ab THEN ESA 

1aä GOSUR 37 

118 CLG 

124 .PLOT QG,240: CRAN 698.248: FLOT 328.G:DRAU 324,404 
13@ LACATE 1:14 

14 nes ee 

158 m1=324/ABS b 

164 Te MP =ma THEN Fr=a 

174 IF mP<rwi THEN Fra 

1584 IF ma<mP THEN Fir=-b 

194 PRIHT Pr 

204 PrH=STRSEE AESS Pr 0 

LOCATE CSA-LEN épr$it.id 
FRIHT Fr$ 

2 debesTh$e der 11 

24 LOCATE 39-LEH des 1. 1 

: PRIHT de$ 

je 1 50 

39-LEHC de$o,2s 
PRINT def 

A mne2A@-"des 1: 

FOR 2=4.1 TO à STEF -c 
RENE 229+2#m0P . +FH CS Er. 1 





3 























ÉOR n=4.1 TO E 
FLOT 324+n#ma.2Z 
HEXT 
3$=INEE"S:IF a$z'"" THEN T6 ELSE 24 
ml=é ABS a + AE bi 1 

4 det=ml-24 

mlieml+s 

DIM der ass 

i T9 kb STEP det 


TER © 
AA+FH FC nn MEN 








A MEYXT i 
34 dei Z1)sc FH fai: DR ec FH FE 
SH FOR j=21 TO 1 STEP -1 

FOR is1 TO à 


IF Al del i+1 31 ABS del i 53 THEH SE 
#4 de=der 1+1° 

dei i+tszdec ii 

dei i sde 

HEXT i 

HEXT 

FRINT"Masimum ou minimum Frobable de la fonction dans cette zone:";de( 1 
dec 1=À det 12) 

FRIHT"'HFPusez sur une touche" 
a$SSINHEE TS: IF a$z"" THEN SrA 

A FETLRN 
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2.5 COULEURS ET CARACTERES 


Les couleurs et la définition des caractères sont Un autre point 


fort de votre CPC. 


Toutefois le nombre maximum de couleurs (32) ne peut pas ètre 
obtenu dans tous les modes. Si vous ne faites pas attention à 
respecter cette limite, vous risquez d'obtenir une erreur IMPROPER 
ARGUMENT. Pour savoir combien de couleurs vous pouvez utiliser 


dans chaque mode, reportez-vous à Votre manuel. 


Voici toutefois une table de toutes les instructions pour les 


modes et la fixation des couleurs: 


Mode 0 Efface l'écran et entre en mode 20 caractères 
Mode 1 Efface l'écran et entre en mode #0 caractères 
Mode 2 Efface l'écran et entre en mode B0 caractères 
Border Fixe la couleur du cadre {| jusqu’à 26). Si deux: 


couleurs sont indiquées, la couleur du cadre 


väriera entre ces deux couleurs. 


Ink Affecte Une couleur (second parumètre} à un 


canal {premier paramètre). 


Pen Affecte en écriture une couleur {second 


paramètre) à un canal (premier paramètre). 
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Papier Affecte pour le fond une couleur [second 


paramètre) à um canal (premier paramètre). 
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2.6 INSTRUCTIONS GRAPHIQUES PUISSANTES 


Nous décrirons dans ce chapitre les instructions suivantes: 


PLOT et PLOTR 
DRAW et DRAWR 
MOVE et MOVER 
ORIGIN 

TEST et TESTR 


XPOS et YPOS 


PLOT X,Y allume le point de coordonnées absolues X,Y. La position 
de ce point est calculée d'après les coordonnées X et Y et 
l’origine actuelle. L'origine est normalement en 0,0, c’est-à-dire 
dans l'angle inférieur gauche de l'écran. PLOTR X,Y allume 
également le point de coordonnées relatives X et Y. Les 
coordonnées de ce point sont donc calculées à l’aide de X et Y 
additionnées aux coordonnées de l'emplacement actuel du curseur 


graphique. 


DRAW X,YŸ est une instruction très puissante qui trace une ligne de 
l'emplacement actuel du curseur au point de coordonnées absolues X 
et Y. DRAMR X,Y trace une ligne de l'emplacement actuel du curseur 


au point de coordonnées relatives X et Y. 

MOVE X,Y déplace le curseur, sans allumer de point, Vers le point 
de coordonnées absolues X et Y. MOVER vers le point de coordonnées 
relatives X et Y. 


ORIGIN permet de modifier l’origine par rapport à laquelle sont 
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calculées les coordonnées absolues. Cette instruction permet 
également de créer une fenêtre. La fenêtre originelle a une 


largeur de 640 points et une hauteur de 200 points. 


L'’instruction TEST X,Y vous permet de lire la couleur du point de 


coordonnées absolues X,Y, l'instruction TESTR celle du point de 


coordonnées relatives X,Y. 


Les fonctions XPOS et YPOS vous permettent de lire l'emplacement 


du curseur en entrant: PRINT XPOS, YPOS. 
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2.7 LA TECHNIQUE DES FENETRES 


Les fenêtres sont devenues une caractéristique des 
microordinateurs aussi importante que la résolution dont nous 


avons parlé au Chapitre 2.1. 


Une fenêtre est une zone définie de l'écran de votre ordinateur 
que vous pouvez traiter comme Un écran indépendant. L’intéressant 
dans la technique des fenêtres est bien sûr d’avoir la possibilité 


d'utiliser plusieurs fenêtres comme vous le permet votre CPC. 


Une application essentielle de la technique des fenêtres est 
l'ergonomie. Le degré d'ergonomie mesurait à l'origine 
essentiellement l'adaptation matérielle d'un système informatique 
(ordinateur, écran, imprimante, périphériques de stockagel aux 
besoins des hommes qui travaillent sur ce système. Un bon degré 
d'ergonomie signifie qu'un travail prolongé sur un système 


informatique ne provoquera pas Une trop grande fatigue corporelle. 


Le concept d'ergonomie a été récemment étendu aux logiciels Îles 
programmes). Les scientifiques ont en effet constaté que la 
présentation optique d'un programme, la présentation des données, 
les temps de réponse du système etc... ont une influence décisive 
pour rendre le travail le moins pénible possible. D'autre part on 
peut travailler de façon beaucoup plus efficace sur un programme 


bien adapté. 


Pour un ordinateur tel que le CPC dont le domaine d'application 
privilégié serait plutôt l'informatique familiale, 1l’intérèt 


essentiel de la technique des fenêtres est Ja plus grande 
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efficacité qu'apporte cette technique, notamment dans deux types 


d'application très importants: les jeux et la gestion. 


Les fenêtres sont très fréquemment utilisées dans les programmes 
de gestion, comme nous le montrerons avec notre programme de 
gestion de fichier au Chapitre 7.2. Les fenêtres permettent en 
effet d'afficher en permanence des informations dont l'utilisateur 
a constamment besoin (numéro d'enregistrement actuel et numéro de 
champ) dans la zone supérieure de l’écran. Vous pouvez également 
définir une fenêtre graphique avec l'instruction ORIGIN. Dans l’un 
des calculs de tableaux à entrer, les données sont affichées sous 
forme de tableaux puis restituées sous forme de figures camembert 


dans des fenêtres graphiques. 


Les jeux sont également Un domaine où la technique des fenêtres 
peut se révéler très utile. Vous pouvez par exemple réserver grâce 
à Une instruction de fenêtre la zone inférieure de l'écran pour le 
dessin d’une route que vous n'aurez plus ensuite à modifier. Si 
VOUS programmez en BASIC, ce peut être le seul moyen d'éviter de 


ralentir votre jeu de façon insupportable. 


Nous vous conseillons de faire plusieurs expériences pour bien 
assimiler la technique des fenêtres. Une première possibilité est 
de modifier le programme de gestion de fichier. Mais vous pouvez 
aussi écrire vous-même de petits programmes: essayez par exemple 
de créer 8 fenêtres avec 8 dessins différents ou essayez de 
déplacer une fenêtre sur l'écran en modifiant les valeurs des 
angles. Comme vous le Voyez, le champ d'application des fenêtres 


est tres vaste. 
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Pour Vous donner quelques idées d'expériences avec les fenètres, 
nous vous proposons d'essayer les deux programmes suivants. Mais 
11 est important que vous créiez également de petits programmes 
utilisant les fenêtres. Même si ces programmes ne présentent en 
eux-mêmes aucun intérêt, l'important est que vous appreniez à bien 


maîtriser la technique des fenêtres pour pouvoir facilement 


l'intégrer ensuite à des applications plus sérieuses. 
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1. Le programme suivant crée B fenêtres qu’il remplit ensuite de 
caractères que Vous ne pouvez pas Voir parce que la couleur du 
fond a été modifiée en ligne 80. 

Vous pouvez modifier les valeurs en lignes 500 - 510 qui 
correspondent aux coordonnées des fenêtres. La première ligne est 
la direction X {valeurs entre 1 et 801), la seconde ligne contient 
les Valeurs Y (entre 1 et 25). Vous pouvez bien sûr créer encore 
plus de fenêtres en remplaçant dans les boucles la valeur 8 par le 
nombre de fenêtres que vous voulez. 


à MOCGE € 

FOR x=i TO € 
REAC colonne( x: 
HEXT x 

FOR #=1 TO & 
REAC ligagé ui 
HEËXT 

FAFER 5 

“= TO & 

: szt T0 8 











colonne sets. Lianet y, Lignes rs 








HEST x 
DATA 1.60,20.6n.30, 45.27, 54 
CATA 4,19,12,:25.1.3,18:1 





4 
: 
ë 
3 
1 
1 
1 
1 
1 
= 


2 9 2 0) 9 = 19 1% 0 0 © D 


DDDDSDS 


Commentaire du programme: 


10 Mode 80 caractères 

20-40 Boucle de lecture des valeurs direction X 
50-70 Boucle de lecture des Valeurs direction Y 
80 Fixation de la couleur du fond 

90-100 Ouverture de la boucle pour X/Y 

110 Création d’une fenêtre 

120 Edition d’une chaîne de caractères 


130-140 Fin de la boucle 


500-510 Lignes de DATA 


2. Le deuxième programme remplit l’écran avec Un caractère puis 
efface un tiers de l'écran chaque fois que vous appuyez sur une 
touche. Une telle routine peut être très pratique dans des 
programmes de gestion où l’on a souvent à effacer des parties 
entières de l'écran, ce qui est très facile à réaliser avec des 


fenêtres. 


La] 


MODE 2 
MIHOOW £2,1,: 
WIHOOW £3, 1, 
MIHDOW £4, 1,84. 
FOR n=2 TO 4 
FOR mn=1 TO 63 
PRINT "4"; 

HEXT 

HEXT 

FOR «=? TO d 

MINDOW SUAP x 

IHÉEYS:IF aës"" THEN 12û 








7 CA Be DU re 







AE SDS DUB OS OURS 


D SGD 






HE 
MOCE Z 


D Et me bé bed be LOI 137 


un£RE 


Commentaire du programme: 


5 Mode 80 caractères 

10-30 Définition de 3 fenêtres 

35-80 Remplissage de l’écran avec des "*#" 

90 Ouverture d’une boucle pour changer les fenêtres 
100 Modification des fenêtres 

110 Attend que vous appuyiez sur une touche 

120 Effaçage d'une fenêtre 

130 Fin de la boucle, on passe à la fenêtre suivante 
150 Suppression des 3 fenêtres 


OT 


2.8 CARACTERES DEFINIS PAR L'UTILISATEUR 


Les caractères définissables constituent la dernière possibilité 
remarquable que nous souhaitons évoquer en ce qui concerne le 


graphisme. 


Le manuel explique malheureusement très brièévement ce que sont 
exactement les caractères définissables. 

Un caractère 5e compose de points allumés ou éteints. La grille 
dans laquelle sont définis les caractères s'appelle une matrice. 
La figure 1 vous montre Une matrice. Il s’agit d’une matrice 8x8. 
On trouve en informatique également des matrices 7*8, 7x9 et même 
10#10 ou 12#12 sur les systèmes professionnels. Le CPC se trouve 
donc dans Une bonne moyenne. Comme pour la haute résolution que 
nous avons traité au Chapitre 2.1, l'intérêt d’une plus grande 
matrice est qu’il permet Une plus grande finesse de définition des 


caractères et donc des caractères plus lisibles. 


[DT 0 
IX 


X 
RER 


D 
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Dans les figures 2 et 3 nous avons allumé des points pour vous 
montrer comment les lettres de l'écran de votre ordinateur sont 
créées. Le CPC dispose de 256 caractères ainsi définis dont 223 


peuvent être redéfinis et donc recevoir une nouvelle forme. 


Pour créer de nouveaux caractères, il faut tout d’abord en définir 
la forme. Le mieux pour celà est que vous dessiniez sur du papier 
à petit carreaux des matrices 8x8. Vous pourrez alors avec un 
crayon remplir des carreaux où les effacer, jusqu'à ce que vous 
soyez satisfait du résultat. Pour entrer ensuite le caractère 
ainsi dessiné dans votre ordinateur, il faut avoir recours à 


l'arithmétique binaire qui est expliquée dans le Chapitre #. 


Pour le moment, reportez-vous à la figure 4. 11 s’agit à nouveau 
d'une matrice 8*8 mais étendue puisque Vous trouvez maintenant au- 
dessus de chaque colonne un nombre de 1 à 128. 

Placez maintenant les points du rardetèse que vous avez dessiné 
dans cette matrice. Examinez maintenant la première ligne et 
additionnez tous les nombres qui sont placés au-dessus d’un point 
de la première ligne. Placez le résultat de cette addition à la 
droite de la ligne, comme en figure 5. Procédez de même pour les 8 
lignes. Les 8 nombres que Vous aurez alors calculés vont 
maintenant Vous permettre de définir Votre caractère. La figure 5 


vous montre par exemple les valeurs correspondant à la lettre E. 
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Une fois que vous avez dessiné votre caractère dans une matrice et 
calculé les valeurs qui le définissent, le reste est relativement 
simple. 11 suffit en effet de réserver de la place en mémoire pour 


votre caractère puis d’affecter celui-ci à une touche grâce à une 


Instruction. 


Pour réserver de la place en mémoire pour Un ou plusieurs 
caractères, utilisez l'instruction SYMBOL AFTER. Cette instruction 
doit être suivie d’Un paramètre entre 32 et 255. Si vous 
choisissez par exemple 240, Vous pouvez redéfinir tous les 
caractères dont le code CHR$ est supérieur à 239 et vous pouvez 
donc redéfinir 16 caractères. Les codes CHR$ sont indiqués dans 


votre manuel. Plus le paramètre de l'instruction SYMBOL AFTER est 
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petit, plus vous occuperez de place en mémoire, ce qui ne pose 
d'ailleurs pas de gros problèmes avec la grande capacité mémoire 
du CPC 464. Si vous utilisez Un paramètre plus petit que 
nécessaire, l'avantage est que vous pourrez définir d’autres 
caractères auxquels Vous n'avez pas pensé au départ. Faites 
attention lorsque vous utilisez l'instruction SYMBOL AFTER de ne 
pas la réutiliser Une seconde fois car ceci détruirait les 


caractères que vous avez déjà définis. 


Les caractères redéfinis vous permettent de vous constituer Votre 
propre jeu de caractères (futuriste, technique-mathématique, 
chimique, ...]). Un tel jeu de caractères peut donner des résultats 
très intéressants si vous l’utilisez dans Vos programmes de jeux. 
Les bons jeux sont ceux dont les acteurs du jeu ont une belle 
apparence. Un petit "i" bombardant de grands "B"s ne présente pas 
un grand intérêt ludique. Vous pouvez donc redéfinir le "i" pour 
lui donner la forme d’un canon et les "B"s pour leur donner la 
forme de dangereux extra-terrestres. Dans ce domaine vous pouvez 


donner libre cours à votre imagination. 


Malheureusement, la méthode consistant à additionner des nombres 
binaires est assez pénible. C'est pourquoi Vous aurez certainement 
beaucoup de plaisir à découvrir le programme que nous vous avons 


mitonné dans les pages suivantes. 
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2.8.1 UN GENERATEUR DE CARACTERES PRATIQUE 


Le programme suivant vous permet de définir Vos propres caractères 


à l’aîde d’un curseur que vous déplacez dans une matrice 8*8. 


Après avoir entré et lancé le programme, Vous Voyez apparaître un 
carré avec un petit point Île curseur) dans l'angle supérieur 
gauche. Vous pouvez déplacez le curseur avec les touches de 
contrôle du curseur et pour marquer Un point, il vous suffit 
d'appuyer sur la touche ’COPY’. Le point est alors marqué par une 
étoile. Pour effacer Un point, amenez le curseur sur la droite de 
l'étoile à supprimer et appuyez sur la touche espace. Pour entrer 
en mémoire la forme d'un caractère, appuyez sur la touche ’E’. 
Vous voyez alors afficher les 8 codes du caractère que vous venez 
de créer et on vous demande quel caractère doit être redéfini. 
Appuyez sur la touche à laquelle vous voulez affecter ce nouveau 
caractère puis appuyez sur ENTER. On vous demande ensuite si vous 
voulez redéfinir d'autres caractères. Tapez ‘O0’ pour oui, ’N’ pour 


non. 


Si, après avoir mis fin au programme vous souhaitez le relancer, 


entrez GOTO 40 car RUN effacerait les caractères que vous avez 


déjà définis. 
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19 SYMBOL AFTER 32 

20 IF s=û4 THEN ue 

80 CIN b$éairiDIM cécés DIN ci 
49 MOCE 1:CLEAF 

58 GOTO Z4ÿ 

60 w=liuzl:zef 

78 LOCATE %,y 

‘89 FLOT “416.0 Pa 

96 aS=IHEE"S : 4 ‘ 
194 PLOT EXT 
14 2-6 

129 yau+ii AND aS=CHR&E Ed nc 1 AND ae CHR fi 3 0 
139 55 THEH yzë 

idg THEH 4x1 















5 
( 
] 
El 





1SQ x=x+i 1 HD 4% Fi 24 1 AND a $eCHRSe 2x 1 
164  THEH 
170 IF «=f THEH : 
= ag=" "THEN 222 
CHR ET : 


224 IF ag='e" GOT 
239 GOTO FE 

248 HINCOUEG, 16,17, 14,18 
854 DRIGIH 143, 129 

264 PLOT H.4,1 

£T4 CRHH 9,138 

284 DRAM 132,134 

898 CEA 132.8 

384 DRAM 4,4 

314 GOTO ËE 

329 b$="" 

538 FLOT 4.6 

349 MOVE 11.12% 

354 FOR m=1 10 ; 

364 FÜR 
974 IF TESTRCU. Miel THEN EHSMIMELSE Lés"a" 
88€ Hg ri = pa 
















396 MOVER 16,6 
4gù HET 
414 MOVE 14, 124-0m#lé 
42g HEXT 

FOR x=1 TO : 










WIHDOW £1.1 
50 HIHCOH SUAP 
d?ÿ FRIMT céliiceauic it di Nic 
486 INFUT"QUEL CARACTERE POIT ÊTRE FE 
494 3=ASCC a$ 1 

599 SYMBOL 3, ct 1 34 Jan guet d Hot St Ci 
514 FRIHT'VOULEZ-VOUS REGEFIHIR C' fi ÎITÉE 
Se inb=INEETS: IF inb="" THEH SE 

534 HIHOOb EUAF 1,4 

549 IF in$="o"THEH 49 

554 MOCE ! 

564 PRIHT'FIN Ci FROGRANME" 
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Commentaire du listing: 


Les lignes 10-50 constituent l'initialisation du programme: 
dimensionnement des Variables et préparation de la redéfinition 
des caractères. On saute ensuite à la sous-routine qui dessine la 
matrice. La fenêtre est Un peu plus grande que la matrice pour 
qu'il n’y ait pas de scrolling vers le haut lorsqu'un point est 


marqué dans l’angle inférieur droit. 


Les curseurs de texte et graphique sont alors positionnés dans 
l'angle supérieur gauche de la fenêtre. La ligne 100 interroge le 
clavier et les lignes 120 - 220 évaluent le résultat. Si vous 
appuyez sur la touche ’E’ [ligne 220) on saute au calcul des 


valeurs composant le caractère: on teste d'abord si au moins un 


34 


point figure dans Une ligne (ligne 3701). Si un point est mis, on 
ajoute un 1 à la variable B$iM}), sinon on ajoute un 0. On 
constitue aînsi pour chaque ligne Un nombre binaire de 8 chiffres. 
Les lignes 430 et #40 transforment les nombres binaires en nombres 
décimaux et les placent dans la variable CiWIi. Une fenêtre de 
texte est alors créée dans laquelle les codes sont affichés et les 
questions vous sont posées. La ligne 500 introduit le caractère 
que vous avez créé dans le jeu de caractères. L’instruction MODE 1 


supprime alors toutes les fenêtres. 


Pour vous montrer ce qu'on peut faire avec Un programme générateur 
de caractères, nous avons écrit Un petit programme qui vous permet 
de créer les accents français aigu et grave. Voici tout d’abord 
une table des codes de ces accents et des touches auxquelles nous 


les avons affectés: 


Accent Touche Numéro de touche Codes 


à : 58 32,16,120,12,124,204,118,0 
é Li ke 8,16,60,102,126,96,60,0 
è 3 59 16,8,60,102,126,96,60,0 
Ü + 43 32,16,102,102,102,102,62,0 
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Voici maintenant le programme. Après l'avoir lancé, les accents 
sont définis et l'écran est vVidé. Une dernière remarque: même 
lorsque la forme d’une touche a été redéfinie, sa fonction reste 


la même. 


10 FOR N=1 TO # 

20 FOR M=1 TO 9 

30 READ AIM) 

40 NEXT M 

50 SYMBOL AU1),AI21,A13),A(X),AIS)I,Alé),AI7I,A(8),A(9) 
60 NEXT N 

70 CLS 

80 DATA 58,32,16,120,12,124,20%,118,0 

90 DATA 42,8,16,60,102,126,96,60,0 

100 DATA 59,16,8,60,102,126,96,60,0 


110 DATA 43,32,16,102,102,102,102,62,0 


Ces accents vous seront certainement très utiles si vous voulez 
par exemple écrire des lettres avec votre CPC. D'autre part celà 
constituera Un excellent exercice pour vous de définir également 


les accents circonflexes et la cédille. 


Voici maintenant encore Un programme qui travaille avec des 
caractères redéfinis qui vous montrera bien que cette technique 


permet {presquel d'atteindre la qualité des dessins animés. 


Le programme Vous montre une auto fonçant sur Un camion à l'arrêt. 


Ce mouvement peut être créé simplement avec Une boucle et 


l'instruction LOCATE. 
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Essayez ensuite de développer ce programme. Vous pouvez par 


exemple modifier la route que suit l'auto ou faire bouger 


également le camion. Vous pouvez également créer des caractères 


permettant de suivre la déformation de la Voiture. Et laissez le 


champ libre à votre imagination! 


5 MODE 1 

10 SYMBOL AFTER 32 

20 SYMBOL 91,1,2,4,8,255,255,255,63 

30 SYMBOL 93,252,36,36,36,255,295,255 ,24 

40 SYMBOL 33,127,127,127,127512797991557 

60 SYHBOL 35,255,255,255,255,255,190,190,28 
70 SYMBOL 36,255,255,255,255,255,124,0,0 

80 SYMBOL 37,255,255,255,255,255,251,248,112 
90 SYMBOL 38,127,127,127,127,127,127,127,127 
100 SYMBOL 39,255,255,255,255,255,255,255,255 
105 SYMBOL 40,255,255,255,255,255,255,255,255 
110 SYMBOL 41,240,240,240,240,255,241,241,241 
111 LOCATE 2,13:PRINT"&" "D" 

112 LOCATE 2,14:PRINT"!#S#SX" 

120 FOR x=39 TO 6 STEP -1 

130 LOCATE x,14:PRINT CHRS (91) 3 CHRS (93) 

135 LOCATE x,14:PRINT" 

140 NEXT x» 

150 GOTO 150 
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Commentaire du programme: 


5 Fixation du mode 

0-110 Définition du caractère 

111 Affichage de la partie supérieure de la voiture 

112 Affichage de la partie inférieure de la voiture 

120 Ouverture d’une boucle pour le déplacement de la voiture 


dans la direction X 


130 Affichage du véhicule 
135 Effaçage de l’ancien véhicule 
140 Fin de la boucle, la Voiture est déplacée Vers la gauche 
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2.9 CARACTERES GRAPHIQUES 


Les caractères graphiques sont une autre possibilité très 
intéressante de votre CPC. Les caractères graphiques sont des 
caractères que vous ne pouvez obtenir simplement en frappant une 
touche mais Uniquement en utilisant la fonction CHR$lcode)l. Les 
codes de tous les caractères graphiques prédéfinis de votre CPC 
ainsi que leur représentation dans Une matrice se trouvent à la 


fin de votre manuel. 


Pour faire apparaître par exemple une bombe à l'écran, 11 faut 


entrer PRINT CHR$(252). 


Vous pouvez faire éditer de cette façon tous les caractères 


graphiques. Vous pouvez également les déplacer avec LOCATE: 


10 MODE 2 

20 FOR Y=1 TO 25 

30 LOCATE 40,Y:PRINT CHRS$(2521) 
40 LOCATE #40,Y:PRINT" * 

50 NEXT Y 


Ce petit programme fait tomber la bombe à travers l'écran avec les 


instructions LOCATE et PRINT. 


La même technique peut vous permettre de réaliser des animations, 


notamment pour vos jeux, qui peuvent être très spectaculaires avec 


un peu d'adresse. 


Voici maintenant un autre programme d’exemple qui vous montrera 
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avant tout la vitesse de cette méthode. Le programme se termine 
par Un message d'erreur mais ceci n’est pas très grave: peut-être 
pourriez-vous essayer de trouver pourquoi. Un conseil: faites 
afficher à la fin du programme la valeur de Y; vous devriez alors 


comprendre d’où vient l'erreur. 


10 MODE 2 

20 FOR x=1 TO 25 

350 t=36 

40 q=12 

SO LOCATE t,x:PRINT STRINGS (&8,CHR$ (249) ) 
60 NEXT x 

70 y=1 

80 FOR x=q TO q+4 

90 LOCATE y,x:PRINT STRINGS (&8,CHRS (250) ) 
100 NEXT x 

110 FOR x=q TO q+4 

120 LOCATE y,x: PRINT STRINGS(88," ") 

130 NEXT x 

140 y=y+8 

150 GOTO 80 


Commentaire du programme: 


10 Passage en mode 80 caractères 

e0 Ouverture de la boucle du mouvement descendant 

30 Valeur initiale pour le mouvement descendant des petits 
hommes 

40 Valeur Y pour les petits hommes fixes 

50-60 Boucle d'édition des petits hommes verticaux 

70 Test si Y égale 1 

80-100 Boucle pour le mouvement horizontal avec des pas de # 


110-130 Boucle pour supprimer le dernier bloc de petits hommes 
140 Incrémentation de la valeur pour que les petits hommes 


se déplacent vers l’avant par blocs 
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2.10 LA MEMOIRE ECRAN 


La mémoire principale de Votre CPC a une taille de 64K, soit 65536 
octets. Vous pouvez utiliser pour Vos programmes BASIC environ 
#3K. 

La mémoire est organisée en # blocs de 16K. Ces blocs sont appelés 
banques et sont numérotés de 0 à 3. La banque 0 est donc le bloc 
allant de l'adresse 0 à l'adresse 16383, la banque 3 le bloc de 
:9152 à 65535. Lorsque vous allumez Votre ordinateur, la mémoire- 
écran occupe la banque 3. Quel que soit donc le mode de gestion de 
l'écran que vous utilisez, il y a toujours 16K qui sont réservés 
pour la mémoire-écran. Entrez maintenant les lignes suivantes et 


lancez le programme avec RUN: 


10 REM Ecran 1 

20 MODE 2:PRINT'"a" 

30 FOR t=&C000 to &FFFF STEP &800 
40 PRINT BINSIPEEK(t),8):NEXT t 


Si vous ne vous êtes pas trompé, Vous voyez apparaître les 


informations suivantes: 
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Vous reconnaissez la carte matricielle du a minuscule que la ligne 
10 a fait afficher dans l’angle supérieur gauche de l'écran. 


Modifiez quelque peu votre programme: 


10 REM Ecran 2 

20 FOR t=8&C000 to &FFFF STEP &800 
30 FOR a=0 TO 3 

40 PRINT BINS(IPEEK(t+a),8);" "3 
50 NEXT a:PRINT 

60 NEXT t 


Entrez maintenant MODE 2 en mode direct puis RUN. Vous obtenez les 
cartes matricielles des lettres Re a d. En effet après avoir 
exécuté l'instruction MODE 2, votre ordinateur a écrit Ready en 
haut de l'écran. 

Vous pouvez maintenant essayer de Voir ce qui se produira si vous 
choisissez Un autre mode avant de lancer le programme. Entrez MODE 
1 puis RUN. Le résultat est inattendu. Vous pouvez encore 
distinguer un R et Un e mais Vous voyez que la carte de chaque 
lettre est répartie sur deux matrices et la moitié droite de 
chaque matrice est pleine de 0. Essayons de savoir pourquoi les 
lettres apparaissent deux fois plus grosses en mode 1 bien qu’en 


fait 11 n’y ait pas plus de 1 qu'en mode 80 caractères. 
Entrez: PEN 2 
MODE 1 


RUN 


Vous pouvez à nouveau reconnaître les deux lettres Ret e, 


toujours réparties chacune sur deux matrices. Maïs la différence 
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est que c’est maintenant la partie gauche de chaque matrice qui 
est constituée de 0 alors que les bits allumés se trouvent dans la 


partie droite. 


La raison de cette différence tient à l’organisation de la 
mémoire-écran de 16K. En effet les mêmes bits sont utilisés à la 
fois pour définir la forme mais aussi les couleurs des caractères. 
11 faut maintenant examiner comment ceci 5e passe exactement 


suivant le mode de l'écran qui a été choisi. 
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2.10.1 MODE 2 


En mode ?, les choses restent relativement simples. Chaque bit mis 
{=1)1 correspond à un pixel ([mini-point de l'écran) allumé avec la 
couleur des caractères. Un 1 signifie donc qu’un pixel reçoit la 
couleur bleue des caractères [définie par le stylo: PEN) et un 0 
qu'il reçoit la couleur jaune du fond de l'écran {définie par le 


papier: PAPER). Par exemple, 51 vous entrez: 


MODE 2:PAPER 1:PEN 0 


CLS 


et que vous lancez Ecran 2 avec RUN, Vous Voyez que chaque 1 
correspond toujours à Un point jaune qui est maintenant la couleur 
du fond de l'écran et chaque 0 toujours à Un point bleu, nouvelle 
couleur des caractères. 

En résumé: en MODE 2, chaque bit de la mémoire-écran indique la 


couleur du point correspondant de l’image de l'écran: 


0 = bleu 


1 = jaune 
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2.10.2 MODE 1 


Passez maintenant en MODE 1. Ce mode vous permet d’avoir #40 
caractères par ligne et de définir 4 couleurs différentes pour les 
caractères. Chaque octet de la mémoire-écran indique quelle 
couleur doit avoir un point de l'écran. 


Examinons un de ces octets: 


Bit No 171615141131211101 


En MODE 1, chaque octet est divisé en deux quartets, comprenant 
donc #4 bits chacun, que nous avons délimités par un II. Les bits 
occupant la même position dans leurs quartets respectifs 
constituent Une paire: bits 3 et 7, e et 6, 1et 5, et 4 et 0. 
Chacun de ces couples de bits représente donc Une des quatre 
couleurs disponibles pour les caractères. On ne pourrait donc en 
principe fixer de cette façon les couleurs que de # pixels de 
l'écran seulement. Comme chaque octet doit correspondre à 8 
pixels, chaque couple de bits correspond en fait également à deux 
pixels contigus. Les bits 3 et 7 correspondent à la paire de 
pixels située à l'extrême gauche. 

Voici une table des couleurs ainsi représentées par chaque couple 


de bits: 


Valeur des bits Couleur 
0 0 Bleu 
0 1 Jaune clair 
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1 0 Bleu-vert clair 


1 3 Rouge clair 


11 est maintenant temps de 5e reporter au programme "Ecran 2" et 
aux deux exemples que nous vous demandions d'essayer: la première 


ligne de la première carte matricielle se présentait ainsi: 


1 11 1 0 0 0 0 


Reconstituez maîntenant les couples de bits solidaires et regardez 


dans la table à quelle couleur ils correspondent: 


Couple de bits: 3,7 2,6 T;5 0,4 
Valeur: 0 1 0 1 0 1 0 1 


Couleur: jaune jaune jaune jaune 


Pour bien comprendre le système de mise en mémoire des couleurs en 
MODE 1, prenez une feuille de papier et tracez-y # carrés de 8 
carreaux sur 8. Divisez chaque carré en # colonnes de deux 
carreaux de large et en 8 lignes. Chaque paire de carreaux sur 
votre papier correspond à une paire de pixels à l'écran. 
Remplissez chaque paire de carreaux 51 le couple de bits 
correspondant indique la couleur jaune. Laîssez-la vide si les 
bits indiquent bleu. Dans notre exemple Vous ne devez pas obtenir 
de couleur autre que jaune où bleu. Quand vous aurez terminé, vous 
obtiendrez Un R et Un e très larges. 

Changez maintenant la couleur des caractères avec l'instruction 
PEN 2. Entrez CLS et RUN. Vous constatez maintenant que tous les 
couples de bits contiennent soit 10 soit 00. En consultant la 


table, vous voyez que 10 produit la couleur bleu-vert clair. 
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Apres toutes ces petites expériences, il me devrait plus vous être 
trés difficile de réaliser maintenant des caructères de quatre 
couleurs différentes. Notez cependant que de tels caracteres ne 
peuvent pas être entres en memoire dans la table des caractères 
avec les instructions SYMBOL ou SYMBOL AFTER. Le seul moyen de les 
réaliser est d'en FOKEr les Valeurs dans la mémoire-ecran. Le 
mieux est donc de placer ces Valeurs dans des lignes de DATA qui 
seront placées par le programme dans la mémoire-écran. 

Vous trouverez à Ja fin de cette section la formule vous 
permettant de calculer dans quel emplacement de la mémoire-ecran 


vous devez FOKEr un caractere de quatre couleurs. 


Ce mode de fonctionnement de votre CPC permet à votre ordinateur 
d'atteindre sa puissance maximum dans le domaine des couleurs, au 
détriment toutefois de la résolution. En effet, pour pouvoir 
sélectionner pour chaque pixel 16 couleurs différentes, il 
faudrait une mémoire de 64K. Comme c'est déjà le cas en mode 1, le 
mode 0 a recours au petit truc qui consiste à affecter à un groupe 
de pixels contigus la même couleur. En mode multicolore, chaque 
couleur est fixée pour un groupe de 4# points contigus. Voici Ja 


table des couleurs disponibles: 


Bin Hex Déc Couleur 

0000 0 0 Bleu 

0001 1 1 Jaune clair 
0010 ra a Bleu-vert clair 
0011 3 3 Rouge clair 
0100 à o Blanc brillant 
0101 5 5 Noir 

0110 6 6 Bleu clair 
o111 7 7 Magenta clair 
1000 8 8 Bleu-vert 

1001 9 Q Jaune 

1010 A 10 Bleu pastel 
1011 B 11 Rose 

1100 C 12 Vert clair 
1101 D 13 Vert pastel 
1110 E 14 Jaune vif 

1111 F 15 Bleu ciel 
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Essayons de placer ces 16 couleurs à l'écran: 


10 REM Exemple de couleurs 

20 DATA &00,811,822,833,8h44,8565,866,877,888,899 ,8&AA,8BB, 
&CC,&DD,&EE ,&FF 

30 MODE 0 

40 FOR d=0 TO 31 STEP 2 

50 READ x 

60 FOR t=8&C000 TO &FFFF STEP &800 

70 POKE t+d,x 

80 NEXT t:NEXT d 


90 GOTO 90 


Si vous lancez ce programme avec RUN Vous n'’obtiendrez pas le 
résultat voulu. Comme en mode 1, les bits qui servent à indiquer 
une couleur ne sont pas des bits contigus: la couleur des # pixels 
les plus à gauche est indiquée par les bits 1,3,5 et 7 d'un octet, 
celle des 4 pixels les plus à droite par les bits 0,2,4 et 6. 
D'autre part l’ordre dans lequel chaque groupe de # bits doit être 


considéré est le suivant: 


# pixels de gauche: bits 1,5,3,7 


4 pixels de droite: bits 0,4,2,6 


Nous pouvons maintenant appeler toutes les couleurs disponibles: 
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Bit No T6543210 


11 faut donc modifier le programme Exemple 


gauche droite octet 


D HN OO UM + U D mm oo 


Le) 


11 
12 
13 
14 
15 


= 


OO D ] OO M + uw nm 


10 
11 
12 
13 
14 
15 


48 
2x0 
60 
e52 


195 
15 
e07 
51 
243 
63 
255 


compte des valeurs indiquées dans la colonne octet: 


de couleurs en tenant 


20 DATA 0,192,12,204,48,240,60,252,3,195,15,207,51,243, 


63,255 


Si vous lancez maintenant le programme ainsi modifié, vous obtenez 


bien les 16 couleurs possibles, 


distinguez bien sr que 


15 couleurs 


dans 


le bon 


puisque la 


identique à la couleur du fond de l'écran. 
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ordre. Vous 


couleur 0 


ne 


est 


2.10.4 POSITIONNEMENT D'UN CARACTERE 


Dans les derniers chapitres, nous avons souvent parlé des 
caractères multicolores ainsi que de la façon de les réaliser. 
Voici maintenant Un petit programme utilitaire qui Vous permettra 


de positionner une carte mémoire de couleurs sur l'écran: 


10 REM Positionnement d'un caractère 

20 MODE 0 

30 INPUT'Quelle colonne";c 

40 LOCATE 1,1 

50 INPUT'"'Quelle ligne";1l 

60 LOCATE 1,1 

70 INPUT"Code couleur "j;couleur 

80 LOCATE 1,1 

90 base=&C000 

100 FOR adresse=base TO base + &3FFF STEP &800 
110 POKE adresse + {c-11 + (11-1)#80),couleur 
120 NEXT adresse 


130 GOTO 30 


Ce programme POKE des petits carrés de la taille du curseur en 
mode 2 dans l'emplacement que vous définissez par ses numéros de 
colonne et de ligne. Le code couleur qui Vous est demandé n’est 
pas identique à celui que vous trouvez dans votre manuel. Il faut 
que vous calculiez ce code Vous-même, ce qui ne devrait pas être 
trop difficile si vous avez 1u attentivement le chapitre 2.10.3. 
La ligne 90 affecte à la variable base la Valeur standard pour le 
début de la mémoire écran. Vous trouverez cependant au Chapitre 6 


une routine en  langage-machine pour déplacer le début de la 
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mémoire-écran. Si vous utilisez cette routine, il faudra ensuite 
modifier la ligne 90 en fonction de la mouvelle adresse de début 
de la mémoire-écran. 

La ligne 110 est la ligne la plus importante du programme 
puisqu'elle place le carré de couleur dans l'emplacement voulu. 
Notez que l'angle supérieur gauche de l'écran [position HOME) a 
pour coordonnées 1,1 et qu'il m'y a pas dans la forme actuelle du 


programme de routine contrôlant la Validité des valeurs entrées. 


STEP &800 


11 me vous a certainement pas échappé que dans toutes les boucles 
de lecture ou d'écriture d'Un caractère dans la mémoire-écran 
apparaît le pas "STEP &800". C’est qu'en effet, contrairement à la 
plupart des autres ordinateurs où les 8 octets correspondant aux 
lignes composant Un caractère sont généralement disposés à la 
suite les uns des autres, dans Votre CPC sont tout d’abord placées 
à la suite les unes des autres les premières lignes des 2000 
emplacements possibles de l'écran (125 lignes de 80 caractères}, 
puis les secondes lignes de ces 2000 emplacements, etc... 
L'adresse de la première ligne du premier emplacement est aussi 
l'adresse du début de la mémoire-écran: &C000 = 49152. La seconde 
ligne du premier emplacement de l'écran se trouve en &C800 = 
51200, etc... C'est pourquoi, une fois calculée l'adresse en 
mémoire de la ligne d’un caractère, 11 faut toujours ajouter &800 
à cette position pour obtenir l'adresse de la ligne suivante du 


même caractère: 
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Hex Déc imal 


Ligne 1 C000 49152 
Ligne 2 C800 51200 
Ligne 3 D000 53248 
Ligne #4 D800 55296 
Ligne S E000 57344 
Ligne 6 E800 59392 
Ligne 7 F000 61440 
Ligne 8 F800 63488 


Chaque ligne utilise donc un bloc de &800 = 2048 octets. Or il n'y 
a que 2000 emplacements différents sur l'écran. Celà signifie que 
dans chacun de ces blocs, 48 octets sont inutilisés dans lesquels 
VOUS pouvez placer des données ou des routines en langage-machine, 
sauf toutefois si vous Utilisez la possibilité de scrolling 
horizontal que nous aborderons au Chapitre 6. Dans ce cas en effet 


ces octets sont utilisés pour la gestion de l'écran. 
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2.11 LES CARACTERES ALTERNATIFS VUS SOUS UN AUTRE ANGLE 


Nous vous avons déjà indiqué au chapitre 2.8 Une manière de 
modifier le jeu de caractères. Il peut cependant arriver que la 
technique fondée sur les instructions SYMBOL et SYMBOL AFTER ne 
soit plus satisfaisante, soit que vous ne souhaiîitiez créer qu’un 
nouveau caractère, soit que vous travailliez entièrement en 
langage-machine, ou bien enfin que vous ne vouliez modifier que # 
ou 5 points d’un caractère existant. Dans ce cas nous vous 
conseillons d'utiliser la méthode à laquelle fait appel le 


programme suivant : 


10 REM Lire le jeu de caractères 
20 MODE 1 

30 FOR t-=&AB80 TO &AB87 

40 PRINT BINS(IPEEK(t),8) 

50 NEXT t 


Vous obtenez à l'écran la carte bits de la flèche pointée vers le 
haut. Le code de ce caractère est 240. Vous pouvez lire de la même 
façon tous les caractères dont le code est supérieur à 239. Les 
choses sont plus compliquées pôur les autres caractères. C'est 
pourquoi nous nous en tiendrons là pour le moment. I1 est de même 
très facile de modifier ces 16 caractères. Essayez la ligne BASIC 


suivante: 


POKE &AB87 ,255 


Lancez à nouveau le programme ci-dessus qui doît toujours se 


trouver en mémoire et vous verrez que notre flèche a maintenant un 
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"pied". Pour éditer la flèche à l'écran, 


La seconde 


PRINT CHR$1240 ):PRINT 


instruction PRINT vous permet de 


caractère sans être gêné par le mot Ready. 


Voici la 
librement 


méthode : 


liste 


pour 


Hex 


des 


les lire 


caractères 


ou les modifier, 


Déc imal 


auxquels 


CHRS( } 


AB80 
AB88 
AB90 
AB98 
ABAO 
ABA8 
ABBO 
ABB8 
ABCO 
ABCB 
ABDO 
ABD8 
ABEO 
ABE8 
ABF0 


ABF8 


AB87 
AB8F 
AB97 
AB9F 
ABA7 
ABAF 
ABB7 
ABBF 
ABC7 
ABCF 
ABD7 
ABDF 
ABE7 
ABEF 
ABF7 


ABFF 


43904 
43912 
43920 
43928 
43936 
43944 
43952 
43960 
43968 
43976 
43984 
43992 
44000 
44008 
44016 
44024 


43911 
#3919 
43927 
43935 
43943 
43951 
43959 
3967 
43975 
43983 
#3991 
43999 
44007 
4015 
L4023 


44031 
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240 
ek1 
24e 
243 
e4# 
245 
246 


e47 


entrez: 


bien voir le nouveau 


Vous 


en 


pouvez accéder 


suivant la 


même 


CHAPITRE 3 LE SON 


3.1 INTRODUCTION 


Le chapitre suivant explique quelques principes fondamentaux de la 


production de bruits et de sons: 


- connexion du CPC 464 sur une chaîne stéréo 

- principes de la musique et du son 

- explication des instructions de production de sons 
- env lenveloppe du volume) 

- ent lenveloppe du ton] 

- éditeur de sons 


- démonstration d'applications dans des jeux 


Nous avons illustre autant que possible par des exemples concrets 
les notions Un peu théoriques qui vont suivre. Lisez donc le 
chapitre suivant avec votre ordinateur et n'hésitez pas à taper 


les programmes les plus importants. 


Si vous ne comprenez pas très bien Une notion quelconque relisez 


attentivement le passage de votre manuel qui s’y rapporte. 


Si vous avez l'esprit plus mathématique que musical, vous vous 
apercevrez bien vite que la musique, notamment la musique sur 
ordinateur est très liée aux mathématiques et à la physique. Si 
tout celà Vous semble trop compliqué, Vous pourrez au moins 
prendre plaisir à écouter les jolies mélodies dont vous trouverez 


les listings à la fin de ce chapitre. 
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3.2 CONNEXION DU CPC SUR UNE CHAINE STEREO 


Vous avez certainement déjà remarqué que le haut-parleur intégré 
ne rend pas justice aux possibilités étendues de votre CPC dans le 
domaine musical. C’est pourquoi nous Vous expliquons en détail 


comment brancher votre ordinateur sur une chaîne stéréo. 


Si vous essayez de brancher directement Un casque sur la connexion 
se trouvant à l'arrière de votre CPC, vous constaterez que celui- 
ci ne produit aucun son par lui-même car le signal qu’il sort 


n'est pas amplifié et n'est donc pas audible avec votre casque. 


11 faut donc utiliser un amplificateur tel qu'en possède toute 
chaîne stéréo ou bien sûr également tout appareil de radio ou 


lecteur de cassette. 


Comment allez-vous envoyer le signal à Votre amplificateur? 
Réalisez pour celà un câble de branchement en dérivé avec du côté 
relié à votre CPC une fiche mâle de 3.5 mm de diamètre. Notez bien 
qu'il s’agit d'une transmission tripolaire comme pour Un casque de 
walkman par exemple. DU côté de votre amplificateur, il vous faut 
une autre fiche mâle pouvant 5s’enficher dans l'entrée microphone. 
C'est en effet l'entrée micro qui réagit le mieux à des sons qui 
n'ont pas été amplifiés préalablement. Si Vous ne disposez pas 
d'une telle entrée sur Votre amplificateur, utilisez l'entrée pour 


la platine disque ou pour le magnétophone. 


Reliez maintenant les deux appareils ensemble, non sans les avoir 


éteints tous deux au préalable pour éviter des complications très 


désagréables. 
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Après avoir relié les deux appareils puis après les avoir à 
nouveau allumés, baissez complètement le Volume pour éviter une 


surprise désagréable. 


Vous pouvez maintenant tester le volume le plus adapté en entrant 


l'instruction suivante: 


SOUND 7,284,32767,7 


Cette instruction produit le LA 40 qui est Uuti115é maintenant par 


les musiciens du monde entier pour accorder leurs instruments. 


Toutes les autres notes sont calculées à partir de celle-ci. 
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3.3 PRINCIPES DE BASE DU SON 


La production de bruits ou de sons est Un aspect très important 
des possibilités d’un microordinateur familial. Dans ce domaine, 
le CPC 464 peut par ses caractéristiques remarquables supporter la 


comparaison avec les meilleurs ordinateurs de sa catégorie. 


Le CPC peut par exemple produire des Ultra-sons, c’est-à-dire des 
sons que vous n’entendrez pas parce qu’ils dépassent le spectre 
sonore audible par une oreille humaine, mais que votre chien par 
contre pourra entendre. En effet, un homme peut entendre des sons 
compris entre 16 Hz et 16 Khz alors que le CPC peut produire des 
sons entre 30 Hz et 125 Khz. Si par exemple Vous entrez SOUND 
1,1,100 Vous nm'’'entendrez rien alors que Votre chien réagira 


certainement. 


Vous savez qu’un morceau de musique n’est qu'une suite de tons de 
différentes fréquences. Si la succession des tons choisis est 
heureuse, vous aurez de la belle musique, dans le cas contraire de 


la mauvaise ou, du moins, ce que vous considérez comme telle. 


La belle musique ne sonne cependant bien que si vous disposez 


également d'un bel instrument, comme c'est le cas avec le CPC 46%. 


Voyons maintenant comment se produit un son pour mieux comprendre 


le principe de la musique sur ordinateur: 


Un son 5e compose d'ondes ou Vibrations. Un ton est plus haut 
qu'un autre si sa fréquence est supérieure, donc s’il se compose 


de plus de Vibrations dans un même intervalle de durée. L'unité de 


mesure des fréquences est le Hertz (Hz). 


Voici un exemple: 


Le do du milieu {do de la clé sur un piano) a Une fréquence de 
261,626 Hz. 
Le la de référence international a une fréquence de #40 Hz et est 


donc plus haut que le do du milieu. 


La figure suivante représente une Vibration avec tous les termes 


importants que nous allons maintenant expliquer. 


Amplitude 


Temps 


Elongation 





Duree de vibration 
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1. Elongationtécart momentané par rapport à la situation de pause |} 


Ce concept n'est pas très important pour la production de sons car 
il ne peut pas être employé d’une manière pratique. Il s’agit 


simplement du nom de l’axe des Y. 


2. Amplitude {écart maximum ou amplitude de vibration) 
Cette valeur correspond au volume d’un son: plus 1’amplitude est 


grande, plus le son est fort. 


3. Durée 
Ce facteur jouera un grand rôle pour la constitution des courbes 


d'enveloppe. I1 correspond à l'axe des X de notre graphique. 


4. Durée de Vibration 
11 s'agit de la durée d’une vibration complète. Ce facteur est 


inversement proportionnel à la fréquence. 


Pour ceux qui me connaissent pas déjà tous les secrets de la 
physique des Vibrations voici le principe qui permet à votre CPC 


de produire des sons: 


Un haut-parleur, qui est indispensable pour que votre ordinateur 
puisse produire des sons, se compose d’un aimant, d’une bobine et 
d’une paroi sonore. Suivant le rythme de l'envoi du courant 
électrique dans la bobine, celle-ci attire ou repousse l'’aïimant. 


Si elle le repousse, celui-ci met en mouvement la paroi sonore, 
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créant ainsi Une Vibration qui se transmet et s’ammplifie dans 


l'air, jusqu’à parvenir à votre oreille. 


Le rythme de l'envoi du courant électrique permet également de 


déterminer la fréquence et donc la hauteur du son. 
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3.4  INSTRUCTIONS SONORES 


Les principales instructions sonores du CPC sont: 


SOUND 
ENV 
ENT 


RELEASE 


L'instruction SOUND est l'instruction de base pour produire des 


sons sur votre CPC. Elle a les paramètres suivants: 


1. Etat canaux: cette valeur indique à l'ordinateur quel canal 
sonore doit être employé et quelles autres activités doivent être 


activées telles qu’un rendez-vous où Un arrêt par exemple. 


Les valeurs de ce paramètre sont calculées d’après la 


signification suivante des différents bits: 


Bit Valeur Commande 

0 1 son envoyé au canal À 

1 2 son envoyé au canal B 

2 4 son envoyé au canal C 

3 8 rendez-vous avec canal A 
# 16 rendez-vous avec canal B 
5 32 rendez-vous avec canal C 
6 6% arrêt 

7 128 flush 


Si vous souhaitez par exemple envoyer Un son sur tous les canaux, 


-63- 


le paramètre état canaux doit donc recevoir la valeur 7. 


Le rendez-vous vous permet 

sonores et donc de 

sans que celà occasionne 

parleur. 

Voici comment se présente un 
1 e 3 4 S 

Canal A: NO NO NO RB RE 

Canal B: NO RC NO NO RA 

Canal C: NO RB RA NO NO 


NO signifie qu’une note est 


avec le canal B. 


Voici maintenant un schéma 


temps de la structure de 


synchronisées figurent dans 


note, PA à une pause: 

Canal A: NO NO NO PA NO 
Canal B: NO NO NO NO NO 
Canal C: NO NO PA PA PA 


Lorsqu'un rendez-vous 


faire exécuter 


est arrangé, 


de synchroniser les trois canaux 


une mélodie avec des pauses, 


un craquement désagréable du haut- 


rendez-vous: 


jouée, RB correspond à Un rendez-vous 


représentant le déroulement dans le 


rendez-vous ci-dessus. Les actions 


la même colonne. NO correspond à une 


NO PA PA 
NO PA PA 
NO NO NO 
dans le 


une pause se produit 


canal appelé. Le canal appelé est celui qui continue à jouer. 


Une autre possibilité de synchroniser les canaux consiste à mettre 
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un arrêt. Un arrêt Vous permet d'arrêter l'émission de son d’un 
canal déjà plein puis de la relancer avec l'instruction RELEASE. 
L'avantage par rapport au rendez-vous est que le canal sonore peut 
être rempli pendant un arrêt alors qu’un rendez-vous n'’admet aucun 


son avant que le rendez-vous ne soit exécuté. 


2. Valeur de Jla note: le second paramètre après l'instruction 
SOUND est la valeur de la note. Vous pouvez trouver les valeurs 
des différentes notes dans une annexe de votre manuel. Vous n’avez 
normalement besoin que des valeurs de l’octave 0 et vous pouvez 


ainsi calculer les autres valeurs: 


Valeur = Valeur de la note de l’octave 0 / 2toctave 


Exemple: La valeur du DO de l’octave -2 sera: 478/21-2 où #78/0.85 


3. Durée du son: cette valeur doit être donnée en  centièmes de 


seconde. 
Si la valeur de ce paramètre est négative, celui-ci indique 
combien de fois la durée de ENV doit être répétée. Si cette valeur 


est nulle, le son sera joué conformément à la durée de ENV. 


&. Volume: paramètre compris entre 0 et 7 lorsqu'il n’y a pas 


d'ENV et entre 0 et 15 s’il y a une ENV. 


Les deux paramètres suivants seront expliqués plus tard, en 


liaison avec ENV et ENT. 


Le dernier paramètre sert à la production de bruits. Si celle-ci 
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est utilisée sur les trois canaux, les trois canaux reçoivent le 


même bruit. 


L'instruction suivante la plus étroitement liée à l'instruction 
SOUND est l'instruction RELEASE qui permet de supprimer Un arrèt 


préalablement posé. 11 suffit d'indiquer comme paramètre le numéro 


du canal (A=1, B=2, C=41). 


Avant de passer maintenant à la partie la plus importante, 
l'explication des courbes d’enveloppe, nous vous proposons de 
mettre Un peu d'ambiance en tapant le programme suivant qui joue 
“Oh when the saints go marching in". N'oubliez pas de le 


sauvegarder sur cassette car nous en aurons besoïn plus tard. 


10 READ a,b 

20 IF a=-1 THEN RESTORE: GOTO 10 

30 SOUND i,a,b 

40 SOUND 2,0.5#a,b 

SO SOUND 4,0.25#a,b 

60 GOTO 10 

70 DATA 478,50,379,50,358,50,319,200,0,5,319,50,478,50,379,S 
0,358,50,319,200,0,5,519, 100 

80 DATA 478,50,379,50,358,50,319,100,379,100,478,100,379,100 
426,200 

90 DATA 0,5,426,50,379,50,0,5,379,50,426,50,478,150,0,5,478, 
50 

100 DATA 379,100,319,100,0,5,319,50,358,150,0,5,358,100,379, 
50,358,50,319,100,379,100 

110 DATA 478,100,426,100,478,200,0,5,478,50,-1,1 


3.5 L'’INSTRUCTION ENV ET LES COURBES D'’ENVELOPPE DU VOLUME 


L'instruction ENV modifie le Volume d’un son de façon à imiter le 


jeu des "vrais" instruments de musique. 


En augmentant ou en diminuant le Volume d’un son pendant le jeu, 


on peut donc obtenir une meilleure sonorité. 


En utilisant l’instruction ENV i1 faut en principe que le volume 
ait été mis à 0 avec l'instruction SOUND (sauf si vous voulez 
délibérément une valeur différente) pour que l'enveloppe 


fonctionne pleinement. 


Les courbes d'’enveloppe sont affectées à des symboles où numéros 
d’enveloppe qui peuvent ensuite être employés dans l'instruction 


SOUND pour appeler une courbe d'erveloppe. 


Ce symbole est le premier paramètre de l'instruction ENV. 
Les trois paramètres suivants: mombre de pas, pas et temps de 


pause peuvent être employés 5 fois les uns à la suite des autres. 


Le nombre de pas indique en combien de pas le volume doit 
augmenter ou diminuer. Le pas, multiplié par le temps de pause 
donne la durée du son. Si cette Valeur est négative, le volume 
diminue. Le temps de pause est la durée en centièmes de seconde 
pendant laquelle doit être maintenu le volume actuel. Ce temps de 


pause peut être également appelé durée du pas. 


Essayez maintenant avec notre petite chanson l'ENV suivante: 
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ENV 1,5,2,1,1,0,16,5,-3,2 


Le résultat vous étonnera certainement mais nous allons maintenant 


vous expliquer comment nous avons calculé ces valeurs: 


Votre manuel comprend une page sur laquelle vous pouvez dessiner 
les courbes de Vos enveloppes. Pensez bien à noter les trois 
paramètres pour chaque partie de la courbe. Voici Un dessin qui 


vous montre comment calculer les paramètres d’une ENV. 
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3.6 ENT ET LA COURBE DE L'ENVELOPPE DU SON 


L’enveloppe du son est dans son principe analogue à l'enveloppe du 
volume mais les possibilités ne sont pas aussi grandes que pour 
l'enveloppe du volume. Les modifications de l'enveloppe du son 
permettent motamment de réaliser Un vibrato c’est-à-dire une 
modification minime de la hauteur du son qui donne une impression 


de tremblement. 


La structure de cette instruction et de ses paramètres de nombre 
de pas, de pas et de temps de pause est identique à celle d'’ENV 
mais alors qQUu'ENV ne nécessite en principe que trois parties, 


attaque, soutien et relâche, ENT en nécessite le plus souvent 5. 


L'instruction suivante produit Une sorte de vibrato: 


ENT 1,5,1,1,10,-1,1,10,11,5,-1,1 


N'oubliez pas dans le programme "Oh when the saints" d'appeler 


maintenant également ENT avec la valeur 1 qui correspond au numéro 


de notre ENT. Si vous employez une Valeur négative, l'enveloppe 


est répétée. 


Voici la courbe qui représente notre enveloppe. Nous avons choisi 


les mêmes unités que pour la courbe ENV. 


Suivez le même schéma pour calculer les valeurs de vos enveloppes. 
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ENT 
+5 


11 faut enfin remarquer que nos enveloppes ne sont pas de 
véritables courbes puisqu'il ne nous est pas possible d'indiquer 
les valeurs de tous les points d’Une courbe mais seulement celles 
des angles de nos courbes. I1 s’agit donc plutôt de Vibrations 


carrées, se composant de segments de droites. 


Ces deux instructions vous permettent cependant théoriquement de 
modifier chaque son jusqu’à le rendre méconnaissable, ce qui peut 
être très intéressant pour Un synthétiseur. L'éditeur de son que 
nous vous fournissons plus loin sera à cet égard Un excellent 


point de départ. 


La méthode la plus simple pour bien comprendre le principe des 
enveloppes consiste à se livrer au plus grand nombre possible 
d'expériences car une sonorité voulue ne peut être obtenue 


uniquement par des calculs abstraits. 


Pour simuler Un äAinstrument, vous devez savoir comment 411 sonne 
exactement: Un instrument à corde émet le plus souvent un petit 
écho dû à la vibration des cordes. Pour imiter ce phénomène, 11 


faut donc que la troisième phase d’ENV, la tombée du volume soit 
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plus longue que la première phase d'attaque du son. 
Pour les instruments à percussion tels que batterie ou timbale, 
cet écho ne se produit pas et le son doit donc retomber plus vite 


qu’il n'est monté. 


Mais il est mettement plus compliqué d’imiter un instrument à 
vent. 11 y a en effet différentes façon de jouer de la trompette 
ou du trombone. Le plus important est de faire monter le volume de 
manière brutale [plus où moins suivant la taille du corps de 
résonance} et de faire dépendre la retombée du volume du type de 


jeu qu'on veut imiter. 
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3.7 L'EDITEUR MUSICAL 


Comme vous l'avez certainement constaté, l'emploi des instructions 
musicales est tout de même relativement compliqué puisque vous 
êtes obligé en permanence de faire des calculs de paramètres. 
C'est pourquoi nous vous proposons Um éditeur musical qui vous 
permettra de produire des sons simplement en appuyant sur une 
touche du clavier. L’affectation des touches correspond à la gamme 
et va donc de do à si et les demi-tons [les dièzes} peuvent être 


obtenus avec la touche SHIFT. 


Le programme vous permet de: 


1. programmer des mélodies 
2. sauvegarder des mélodies 
3. faire jouer des mélodies 
#. charger des mélodies 


1. Ce premier point du programme Vous permet de produire des sons 
en appuyant sur différentes touches du clavier. Ces sons sont mis 
en mémoire par votre CPC qui pourra les rejouer lorsque vous le 
souhaiterez. Vous disposez de 9 octaves que VOUS pouvez 
sélectionner en appuyant sur une touche entre 1 et 9. 
L'affectation des touches sera récapitulée plus loin dans un 
tableau. En appuyant sur la touche ’P' vous pouvez faire afficher 
à l'écran la dernière touche sur laquelle vous avez appuyé. 

Vous devez cependant faire attention à la limite suivante: vous ne 
pouvez faire mettre en mémoire, plus de 1000 sons pour ne pas 
épuiser la capacité de mémoire disponible et pour éviter des 


complications lors de la sauvegarde. Surveillez donc le nombre de 
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sons déjà mis en mémoire qui s'affiche dans l’angle supérieur 


gauche de l'écran. 


Vous pouvez définir la durée d’un son en tenant une touche appuyée 
plus ou moins longtemps. I1 se produit toutefois une petite pause 
lors de la programmation qui disparaîtra lors de l'exécution de la 


mélodie. 


Pour revenir au menu lorsque VOUS êtes dans le mode 1 


{programmation de mélodies], appuyez sur la touche ENTER. 


2. Vous pouvez ici sauvegarder une mélodie en en indiquant le nom. 
Les notes sont sauvegardées sous la forme d’une liste de variables 
que le mode 4 vous permet de recharger. Laissez toujours un 
certain espace entre deux mélodies différentes pour pas qu'elles 
ne se chevauchent et pour que vous puissiez les retrouver plus 


facilement. 


3. Ce mode vous permet de faire jouer la mélodie que vous Venez de 
programmer où de faire charger. Les notes sont jouées dans l’ordre 
où vous les avez entrées, sans pause. Pour programmer une pause, 
il faut appuyer en mode 1, lors de la programmation de la mélodie, 


sur la touche espace. 


&. Ce mode vous permet de faire charger une mélodie que vous 
pouvez ensuite faire exécuter en mode 3. 11 n'est cependant pas 


possible de modifier Une mélodie que vous Venez de charger. Pour 
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que ceci soit possible, 11 faudrait que vous modifiez légèrement 
le programme. Vous devriez y arriver sans trop de difficultés une 
fois que vous aurez étudié le commentaire du listing de ce 


programme. 


Autre points susceptibles d’être améliorés: 


a) le programme ne travaille qu'avec Un canal, ce à quoi vous 
pouvez remédier en ajoutant deux instructions SOUND et en étendant 


l'affectation des touches. 


b}) vous n'avez aucune possibilité de modifier le volume en mode 
programme mais Vous pouvez le faire avec le bouton de volume de 


votre CPC ou de votre chaîne stéréo. 


Pour utiliser pleinement notre programme il est recommandé de 
connecter le CPC à une chaîne stéréo car la sonorité ne sera pas 


sinon très bonne. 


Table d'affectation des touches: 


Touche Signification Commentaire 
€ note do 
C do dièze 
d note ré 
D ré dièze 
e note mi 
f note fa 
F fa dièze 
g note sol 
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espace 


p 


U + uw nm 


ENTER 


sol dièze 

note la 

la dièze 

note si 

pause 

affichage touches activé la première fois, désactivé 


la seconde 


octave -3 numéro d'octave d’après la table du 
manue 1 

octave -2 

octave -1 


octave 0 


octave 1 

octave 2 

octave 3 

octave # 

octave 5 non indiquée dans le manuel 
fin retour au menu 
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18 DIM ton 1686: 
28 MODE = 
34 LOCATE 5,19:PRINT'"Proïrammer une melodie si" 
46 LOCATE S,12:PRINT"Sauvegarder une melodie :2" 
98 LOCATE 5,14:PRINT'" Jouer une melodie 23" 
6@ LOCATE S,16:PRINT"Char®@er une .melodie : 4" 
7g LOCATE 5,29: INPUT" Mstre choix "ou 
89 ON wa GOTO 148.490, 334, 2:96 
3 END 
164 CLS 
119 PRINT'Frosrammer une me lo 4 i s" 
128 n=Q 
136 FÜR toene=1 TO 1950 
146 2$=IHKEYS:IF a$="" THEN 149 

3=2+0478 AND a$g="c" ic dé AND a$="d"i 

CSA AND a$="e" tr ANC ag="f"o 

6 AHC a$="s" ec AND ag$="a"i 
188 axa+i 293 AND a$="b" 146 AHD agz"c"s 
19Q 3=2+C4602 AND a$="0" + AHC a$g="F"5 
204 3=3+:301 AND a$="G"54i2és ANG a$="A" 5 
216 IF a$="p" ANT Fr=<û THEN Frael:GOTO 144 
z28 IF a$="r" AC przi THEN przi 
IF a$=CHR$ 135 THEN GOTO 26 
Léagi:lF rs THEH men ELSE gotosca 

Ê “INT 23%: 

















26 toné toene : 
279 SOUND 1:ta n& : 

289 LOCATE 1:1:PRIMT toene 

294 az 

344 HEXT 

514 GOTO 24 

324 vn=d-"n:GOTO 144 

3534 CLS 

348 LOCATE S5.15:FRIHT"'Ecoutez 13 melcdie" 
350 FOR vel TO toene 

364 SOUND 1'tonéun 

374 NEXT 

358 GOTQ £G 

334 CLS 

406 LOCATE S%,5:PRIHT'Char 3er un e moe À eo di s" 
dia LOCATE 1.24 

415 IMPFUT'"'Hom de 14 meloadie";inat 

42Q CFENIN n3$ 

43@ IHPUT£S; toene 

44G FOR n=1i TO toene 

459 INPUT£S ton Ho 

464 HEXT NH 

47@ CLOSEIH 

484 GOTO 2@ 

498 CLS 

244 LOCATE S:5:FRINT'S au vesarder un & me | 
914 IHFUT'"'Hom de la melodie";inas 

924 OPENOUT na$ 

538 PRINT£3.toene 

544 FOR nsl TO toere 

554 PRIHT£S: tonén2 

964 NEXT 

574 CLOSEOUT 

52@ GOTO 24 
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Commentaire du listing: 


lignes 20-90 
lignes 100-310 
ligne 130 
ligne 140 
lignes 150-230 
ligne 240 
ligne 250 


ligne 260 


ligne 270 
ligne 310 


ligne 320 


lignes 330-380 
ligne 350 
ligne 360 
ligne 380 
lignes 390-480 
ligne #20 
ligne 430 
ligne 440 
ligne 450 
ligne 470 
ligne 480 
lignes 490-580 
ligne 510 


ligne 520 


:menu et choix du mode (1-4) 

:mode programmation 

ouverture de la boucle pour le nombre de notes 
interrogation du clavier 

:évaluation de la touche enfoncée 

:évaluer si octave a été changée 

:affichage éventuel de la touche enfoncée 
sécriture de la Valeur dans la variable actuelle 
du tableau 

:production du son par l'instruction SOUND 
sretour au menu 
:changement de l'octave, retour au mode 
programmat ion 

:mode de jeu 

:ouverture de la boucle pour le nombre de sons 
:jeu de la note actuelle 

retour au menu 

:charger une mélodie 

:ouverture d’un fichier d'entrée cassette 
:lecture du nombre de sons 

souverture d’une boucle de lecture des sons 
:lecture des sons 

: fermeture du fichier d'entrée cassette 

:retour au programme principal 

: sauvegarde d'une mélodie 


entrée du nom de la mélodie 


:ouverture d’un fichier sortie cassette 
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ligne 


ligne 


ligne 
ligne 


ligne 


530 


540 


550 
570 


580 


:écriture du nombre de sons sur la bande 
:ouverture de la boucle pour l'écriture des sons 
sur la bande 

:écriture des différents sons sur la bande 
:fermeture du fichier sortie cassette 


:retour au programme principal 
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3.8 PROGRAMMES EXEMPLES 


Les petits programmes suivants Vous permettront d'ajouter à vos 
propres programmes les sons qui leur manquent. Nous avons choisi 
des exemples que Vous pourrez intégrer sans difficultés dans nos 
deux jeux. 11 vous sera également aisé de les modifier suivant vos 


besoins. 


Les titres de chaque programme correspondent à ce que nous avons 
entendu. Vous pouvez bien sûr les utiliser pour imiter d'autres 


sons. 


Une autre remarque: les muméros de ligne peuvent fort bien être 
modifiés, à condition bien sr que vous pensiez à modifier 
également les muméros de ligne des instructions de saut, ce qui 
est très facile avec l'instruction RENUM dont dispose votre 


ordinateur. 


Vous pouvez enfin améliorer nos exemples en Utilisant les 
enveloppes ou créer des dessins correspondant aux sons de nos 
exemples. Plus Vous donnerez cours à Votre imagination, meilleurs 


seront les résultats obtenus. 
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10 


+ 
2 


30 
40 
50 
60 
70 
80 


10 
20 
30 
40 


10 
20 
50 
40 
So 
60 


REM Police 
FOR n=100 TO 200 STEP 10 


SOUND 1,n,2 

NEXT 

FOR n=200 TO 100 STEP -10 
SOUND 1,n,2 

NEXT 

GOTO 20 


/ 
REM Occupe 

SOUND 1,100,100,15 
SOUND 1,0,100 

GOTO 20 


REM @ütaille galaxiale 

FOR n=90 TO 125 STEP INT(RND(1)#10)+1 
SOUND 1,n,2,15 

NEXT 

SOUND 1,0, INT (RND (1) #20) 

GOTO 20 


REM Gamme 
FOR n=127 TO 450 STEP 12 
SOUND 1,n 
NEXT n 
FOR n=450 TO 127 STEP -12 
SOUND 1,n 
NEXT n 
GOTO 20 
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10 
20 


350 
40 


10 
20 
350 
40 
50 
80 


10 
20 
30 
40 
50 
60 
70 
80 


REM Explosion 


FOR n=15 TO 1 STEP -1 
SOUND 1,426,40,n,,,1 


NEXT 


REM Alarme 


FOR n=500 
SOUND 1,n 
NEXT 
SOUND 1,0 
GOTO 20 


REM Touches lointaines 
TO 800 STEP 15 
52,15 


FOR n=100 
SOUND 1,n 
NEXT 


FOR x=1 TO 7 STEP 0.5 
SOUND 1,400,5,%,%91 


NEXT 
SOUND 1,0 
GOTO 20 


Rem Mélodie Favorite 
(1) #3500) +284 


a= INT (RND 
SOUND 1,a 


b=INT (RND (1) #3400) +284 


SOUND 2,b 


c=INT (RND (1) #3300) +284 


SOUND 4,c 
GOTO 20 


TO 100 STEP -15 
4 


30 


,50 
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Le programme suivant répond au même principe que le programme 
musical “Oh when the saints". Ce programme joue la mélodie "Happy 
Birthday". Comme il ne comprend que des notes et des durées de 
notes, nous Vous conseillons également de l’améliorer avec ENV et 


ENT pour obtenir Une sonorité plus belle. 


10 REM happy birthday 

20 READ a,b 

30 1F b=-1 THEN END 

40 SOUND 1,a,b 

50 GOTO 20 

60 DATA 319,50,319,50,284,100,319,100,239,100 
70 DATA 253,150,319,50,319,50,284,100,319,100 
80 DATA 213,100,239,150,319,50,319,50,159, 100 
90 DATA 190,100,239,100,253,100,284,100,179,50 
100 DATA 179,50,190,100,239,100,213,100,239,150 
110 DATA O,-1 


Commentaire du listing: 

10 titre 

20 lecture des notes et durées de notes 
30 demande si morceau terminé 

40 joue la note À de durée B 

50 retour en 20 


60-110 data de notes et durées de notes 
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3.8.1 REVEIL SONORE 


Pour vous distraire de nos explications parfois. très théoriques 
sur la création du son ates le CPC 464, Voici Un programme que 
Vous pourrez fort bien utiliser si vous faîtes partie de ceux qui 
ont Un peu de mal à se lever le matin. 11 s’agit d’une horloge 
digitale qui est conçue de façon à pouvoir Vous réveiller à coup 
sûr. Elle émet un léger son pour marquer chaque seconde, un son 
plus fort pour marquer chaque minute et comme elle joue Une petite 
mélodie pour marquer les heures, Vos amis penseront certainement 


que vous avez Une véritable horloge suisse. 


Notre horloge est encore simple mais Vous pouvez en faire un 
second big ben si Vous calculez les notes de morceaux de musique 
que Vous souhaitez faire jouer par le réveil. Vous pouvez 
également vous faire réveiller par la mélodie ou par Un son encore 


plus terrible que celui que nous avons choisi. 


Mode d'emploi: 

Après que vous ayez lancé le programme, on vous demande d'entrer 
l'heure actuelle dans l’ordre heures ,minutes,secondes. 

Entrez ces Valeurs l’une après l’autre, avec la touche ENTER. 

On vous demande alors l'heure du réveil. L'entrée se fait de la 
même façon. Si vous appuyez sur ENTER sans avoir tapé de chiffre, 
c'est à minuit (0 heurel que vous serez réveillé. 

Pour interrompre le signal du réveil, appuyez sur une touche. Le 
signal du réveil s'arrêtera alors et l'horloge continuera à 


fonctionner normalement. 
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Si vous constatez que l'horloge n'est pas exacte, modifiez en 
ligne 150 le pas de l'instruction EVERY. Si l'horloge retarde, il 
faut que vous diminuiez la valeur suivant EVERY et que vous 


l’augmentiez au contraire si l'horloge avance. 


10 MODE 2 

20 INPUT “heures "32 

30 INPUT “minutes "3, 

40 INPUT “Secondes n3 x 

50 INPUT "heure de réveil (h)" ,22 

60 INPUT “heure de réel (m3 * ,y2 

70: INPUT mheure de réveil (S)n 742 

80 MODE O 

90 LOCATE 3,9:PRINT CHRS# (150) ; STRINGS (&D, CHRS (154) ) CHRS# (156 


100 LOCATE 3S,10:PRINT CHR#(149):LOCATE 17,10:PRINT CHR$# (149) 
110 LOCATE 3,11:PRINT CHR$(149):LOCATE 17,112PRINT CHR$ (149) 


120 LOCATE 3,12:PRINT CHRS (149) :LOCATE 17,12:PRINT CHRS (149) 
130 LOCATE 3,13:PRINT CHRS$ (147); STRINGS$ (&D,CHR$ (154)) ; CHRS (1 
S3) 

140 LOCATE 5,5:PRINT" RE VEIL : 

150 EVERY 50,2 GOSUB 170 

160 GOTO 160 

170 SOUND 1,284,5,5:x=x+1 

180 IF x=60 THEN x=0:y=y+1:SOUND 2,71,5,6 

190 IF y=60 THEN y=0:z=2+1:GOSUB 270 

200 IF z=22 AND x=x2 AND y=y2 THEN GOSUB 320 

210 LOCATE S,11:PRINT z 

220 LOCATE 8,11:PRINT":" 

230 LOCATE 9,11:PRINT y 

240 LOCATE 12,11:PRINT":" 

250 LOCATE 13,11:PRINT x 

260 RETURN 

270 READ no 

280 IF no=-1 THEN RETURN 

290 SOUND 4,n0,30,7 

300 GOTO 270 
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310 DATA 253,253,169,169,150,150,169,190,190,201,201 225,225 


1253, 169,169,190,190,201,201,225,169,169,190,201,201 


315 DATA 225,253,253,169,169,150,150,169,190,190,201,201,225 


,225,223,-1 

320 SOUND 7,100,1000,15 

330 IF INKEY$="" THEN GOTO 330 
340 SOUND 135,0 

350 RETURN 


Commentaire du listing: 


lignes 10-80 fixation du mode écran, entrée des 
nécessaires ([h,m,s) pour l'heure et l'heure de 
réveil 

lignes 90-140 dessin du cadre de l'horloge 

ligne 150 l'instruction EVERY appelle à chaque seconde la 


routine 170 
ligne 170 production du signal des secondes et 


d'une seconde 


ligne 180 interroge si minute atteinte; si oui, production 


du signal des minutes 


ligne 190 interroge si heure atteinte; si oui, production 


du signal des heures 
ligne 200 interroge si heure du réveil atteinte; 
saut à la sous-routine en 320 


lignes 210-260 affichage de l'heure dans le cadre 


ligne 270 lecture des notes 

ligne 280 interroge si fin de la mélodie atteinte 

ligne 290 joue la mélodie avec les trois canaux sonores 

ligne 310 ligne de data avec les valeurs de notes 

ligne 320 production du signal du réveil 

ligne 330 le programme attend ici qu'on appuie sur 
touche 

ligne 340 ce type d'instruction SOUND interrompt le signal 
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du réveil et envoie Un arrêt dans les canaux 


sonores. 
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CHAPITRE &# LE LANGAGE MACHINE 


#.1 INTRODUCTION AU LANGAGE MACHINE 


Cette introduction n'est pas Un cours exhaustif sur le langage- 
machine. Elle doit simplement Vous permettre d'appréhender les 
techniques de programmation les plus sophistiquées que vous 
puissiez appliquer à votre CPC 46. Vous savez en effet 
certainement que certains problèmes de programmation, insolubles 
en BASIC, ne peuvent être résolus qu'au moyen de petites routines 
en  langage-machine. Une routine de tri beaucoup trop longue en 
BASIC pourra, écrite en BASIC, prendre jusqu'à 100 fois moîns de 


temps. 


Le cerveau de votre CPC 464 est Un microprocesseur Z 80, un des 
microprocesseurs 8 bits les plus répandus dans le domaine des 
ordinateurs familiaux. Le Z 80 possède un jeu d'instructions de 
plus de 600 instructions dont nous ne pouvons Vous donner une 
description complète dans le présent ouvrage. 

Le microprocesseur de votre CPC 464 travaille de manière digitale, 
c'est-à-dire qu’il ne peut, dans toute opération interne, 
distinguer que deux états, que nous pouvons nous représenter comme 
les états ALLUME ou ETEINT ou bien 1 ou 0. Un tel commutateur, qui 
ne peut donc représenter que deux états, me permet pas d’aller 
bien Join. C'est pour celà que huit commutateurs sont toujours 
regroupés, à l’intérieur du microprocesseur, pour former un 
registre. On désigne un commutateur sous le nom de bit, alors 
qu'on appelle octet Un groupe de huit bits. Un registre de 8 bits 


peut être ainsi représenté: 
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T65#3210 


01101001 


A la ligne supérieure figure la numérotation des bits, qui va de 0 
à 7. En dessous, le contenu de chaque bit, soit 0, soit 1. Alors 
qu'un bit ne peut donc représenter que deux états, 8 bits peuvent 
déjà en représenter plus. Si nous comparons avec les nombres 


décimaux auquels nous sommes habitués, 


3210 
572% 


nous avons, ici aussi, numéroté chaque chiffre, cette fois de 0 à 
3. Comment calculons-nous la valeur d’un tel nombre? Chaque 
chiffre a une Valeur entre 0 et 9 qui représente une grandeur 10 
fois plus importante chaque fois qu'on se déplace d’un chiffre 


vers la gauche: 


% + 2#10 + 7#10#10 + S#10#10#10 = 5724 


Nous pouvons procéder, avec le contenu de notre registre, de 
manière tout à fait analogue: on appelle de tels nombres, par 
opposition aux nombres décimaux, nombres binaires puisqu’un 
chiffre peut prendre, non pas 10, mais seulement 2 valeurs. Un 
chiffre plus à gauche ne représente donc plus non plus une valeur 
10 fois mais seulement 2 fois supérieure. Nous pouvons maintenant 


calculer également la Valeur du contenu de notre registre: 


1 + O2 + ONHOHD + 1H#0H0H2 + OK2A2ACY2 


1HOHONHOHOKE + 1HPHONODADKOKE + DHOHCHOKOHOHOYKO 
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= 1 + 0 + O0 + 8 + O0 + 32 + 64 + 0 = 105 


Nous obtenons donc, comme contenu du registre, la Valeur 105. Nous 
pouvons nous simplifier ce calcul laborieux en calculant d’abord 
une bonne fois les Valeurs de chaque chiffre, de même que nous 


avons en tête les Valeurs des chiffres des nombres décimaux. 


Chiffre Valeur 


0 e10 = 1 

1 et1-=2 
2 ete = 4 

3 213 = 68 

D et4 = 16 
5 ets - 32 
6 216 = 64 
7 e1t7 = 128 


Quelle peut être la Valeur maximale du contenu d’Un registre? La 
valeur maximale est atteinte lorsque tous les chiffres ont la 
valeur 1, ce qui donne alors: 1 +2 + 4 + 8 + 16 + 32 + 64 + 128 
= 265. La valeur la plus élevée qui puisse être représentée avec 8 
bits est donc 255. On peut ainsi représenter 218 = 256 valeurs 
différentes (de 0 à 255). 

Pour convertir les nombres binaires en décimaux il suffit d'entrer 
PRINT&xnombre binaîire. Pour convertir les nombres décimaux en 


binaires 11 suffit d'entrer PRINT BIN$inombre décimal }: 


PRINT&x01010101 
85 
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PRINTBINS1{85) 


01010101 


Notez que les 0 placés avant le 1 le plus à gauche sont ignorés. 
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4.2 LE SYSTEME HEXADECIMAL 


La manipulation des nombres binaires reste toutefois très 
fastidieuse. C'est pourquoi a été introduit Un deuxième système 
numérique, qui reste cependant en relation étroite avec les 
nombres binaires, mais qui permet Une représentation des valeurs 
avec beaucoup moins de chiffres. Si l’on divise, en effet, un 
nombre de 8 bits en 2 nombres de # bits, chacun des 2 nombres de # 
bits pourra représenter 16 Valeurs différentes. 11 suffit alors de 
créer un système numérique possédant 16 chiffres différents pour 
pouvoir exprimer, avec 2 chiffres de ce système, tout nombre 


binaire de 8 chiffres. 


T654k3210 
0 1 4 0 1 0 © 1 


6 9 


Chaque octet est ainsi divisé en 2 demi-octets, également appelés 
quartets. Cependant, comme chaque quartet peut prendre une valeur 
allant de 0 à 15 et que notre système décimal ne comporte que des 
chiffres allant de 0 à 9, se pose le problème des chiffres devant 
représenter les Valeurs 10 à 15. Ce problème a été résolu en 
prenant simplement les lettres À à F. Le système numérique ainsi 
réalisé a été appelé "hexadécimal". Voici Un tableau d'équivalence 


des trois systèmes évoqués: 
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Binaire Hexadécimal Décimal 


0000 0 0 
0001 1 1 
0010 2 2 
0011 3 3 
0100 SL 4 
0101 5 5 
0110 6 6 
0111 7 7 
1000 8 8 
1001 9 9 
1010 A 10 
1011 B 31 
1100 C 12 
1101 D 13 
1110 E 14 
1111 F 15 


Nous utiliserons essentiellement les nombres hexadécimaux parce 
qu'ils sont d'une part faciles à représenter et qu'ils sont 
aisément traduisibles en nombres binaires. Le système hexadécimal 
permet d'exprimer avec seulement deux chiffres les Valeurs de tout 


groupe de 8 bits. 


Les nombres de deux octets {donc de 16 bits} sont divisés en deux: 
l'octet fort et l'octet faible (lhighbyte et lowbytel. Dans le 
nombre A1E1, Ai sera l’octet fort (Ihighbytel et E1 l’'octet faible 
(lowbytel. Pour calculer un nombre de 16 bits il suffit donc de 


calculer les Valeurs de 5es octets fort et faible puis de 
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multiplier la Valeur obtenue pour l'octet fort par 256 et de 


l'ajouter à la Valeur obtenue pour l’octet faible: 


A1E1 =) octet fort = A1 = 161 


octet faible = E1 = 225 


A1E1 


161*256+205 = 41441 


La formule est: octet fort *# 256 + octet faible 


Bien sûr vous pouvez vous dispenser de faire ces calculs de 


conversion puisque votre CPC 464 dispose également de fonctions de 


conversion déc imal-hexadéc imal : 


PRINT HEXS${nombre décimal) 


et hexadécimal-déc imal : 


PRINT&nombre hexadécimal 


11 y a toutefois une limite: cette fonction ne permet de convertir 


que les nombres hexadécimaux jusqu'à 7FFF car pour les nombres 
plus importants, 65536 est retranché du résultat ce qui donne un 
nombre négatif: 


PRINT&AIÏEA ne donne pas 41441 mais -24095 (41441-65536:-24h0951. 


Pour remédier à cet inconvénient, Vous pouvez utiliser la routine 


suivante: 


10INPUT A$:B$="&"+A$:1F VALIBS)<0 THEN PRINT VALIBS$ 1+65596 : END 
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20 PRINT VALIB$) 


Nous avons utilisé une variable alphanumérique pour que vous ne 


soyez pas toujours contraint d'écrire un "&". 


Imprégnez-vous bien de ces notions fondamentales d'octet fort et 
d'octet faible car nous les retrouvVerons très souvent dans la 
suite de cet ouvrage, notamment pour le calcul des adresses. C'est 
le même principe qui explique d’ailleurs que l'adresse la plus 
élevée soit 65535 puisque l’octet fort peut au maximum contenir 
255 aînsi que l'octet faible. Une adresse sur deux octets peut 


donc au maximum valoir 255*x256+065 = 65535. 
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#.3 TECHNIQUES DE PROGRAMMATION 


Plusieurs méthodes permettent de programmer en langage-machine à 
partir du BASIC: la première et la plus longue en temps consiste à 
POKEr les différents codes d'instruction dans les adresses 
voulues. Une féthode beaucoup plus pratique consiste à utiliser ce 
qu'on appelle un moniteur de longage-machine. Nous vous 
fournissons à la fin de ce chapitre Un moniteur provisoire de 


langage-machine. Ce programme sera décrit en détail plus loin. 


En ce qui concerne la première méthode: vous savez que 
l'instruction POKE X,A écrit dans l'adresse X la Valeur A. En 
langage-machine les instructions sont affectées à des adresses de 
la mémoire, comme elles le sont en BASIC à des numéros de ligne. 
Si vous voulez donc écrire Un programme en langage-machine à 
partir de l’adresse &2000, 11 faut poker la Valeur correspondant à 
la première Ainstruction du programme dans l'adresse &2000 et les 
valeurs correspondant aux paramètres, s’11 y a lieu, dans les 
adresses &2001 et &2002. Si la première instruction tient sur Un 


octet, l'adresse &2001 contiendra déjà la seconde instruction. 


Les programmes en langage-machine ne se composent que de codes 
directement compréhensibles par l'ordinateur. À chaque instruction 
correspond en effet Un ou plusieurs codes, ce qui fait qu'un 
programme en langage-machine n'est qu’une longue suite de chiffres 
qu’il faut entrer en mémoire avec l'instruction POKE dans l’ordre 


correspondant à la suite logique des instructions. 


Pour lire le contenu d’une adresse de la mémoire de votre 


ordinateur, vous devez Utiliser l'instruction PEEKIX]). Le résultat 
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obtenu est le contenu de l'adresse X. Pour lancer Un programme 
déjà placé en mémoire, il faut utiliser l'instruction CALL X qui 


appelle le programme en langage-machine figurant à l'adresse X. 


Vous allez Voir surgir dans les pages suivantes de nombreux 
problèmes qui ne doivent pas Vous impressionner: nous n’avons pas 


nous non plus appris le langage-machine en trois jours. 


ASSEMBLEUR 


L'assembleur est Un langage de programmation qui utilise des 
abréviations symboliques à la place des codes Véritables des 
instructions du langage-machine. Ces abréviations sont appelées 
“mnémoniques". Par exemple, l'instruction "load" est figurée par 
l'abréviation "ld". Comme la machine ne comprend que les codes 
binaires, 11 faut qu’un programme convertisse les mnémoniques 
d'instructions en nombres binaires. Un tel programme s5’appelle un 
assembleur. Un assembleur permet en outre d’affecter aux adresses 
importantes des noms symboliques appelés labels létiquettes]. Les 
labels peuvent servir également à donner Un nom aux variables que 


nous utilisons. 


Comme l'indique le manuel, la société Amstrad prépare un programme 


d’'assembleur. 


REGISTRES ET PREMIERES INSTRUCTIONS 


Examinons tout d’abord la structure des registres du 
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microprocesseur (cerveau de l’ordinateur |: 


-le registre «a, souvent appelé également accumulateur. Il sert 
essentiellement au stockage et au traitement des valeurs 
actuellement utilisées car il peut être employé de manière très 


polyvalente. 


-le registre bc, ce qui signifie compteur d’octets ([bÿyte counter) 
sert souvent aux tâches de comptage. 11 s'agit en fait d’un double 
registre puisqu'on peut appeler séparément les registres b et c 
qui le composent. Le registre bc, contrairement au registre a, 


peut donc admettre des nombres de deux octets | jusqu'à 65535). 


-le registre h1l (high-low}l est également Un registre double qui 
sert essentiellement à stocker des adresses qui, comme vous le 
savez, sont des mombres 16 bits. Toutefois, il est également 
possible d'appeler séparément les deux registres dont il se 


compose. 


-le registre de est un autre registre double important. Ce 
registre permet essentiellement de stocker des Valeurs 16 bits, 
soit quand les autres registres doubles sont déjà occupés, soit 
tout simplement lorsqu'une instruction a besoin de trois double- 


registres. 


Lorsqu'on considère la structure du microprocesseur, on se demande 
tout d’abord comment une valeur déterminée peut être transférée de 
la mémoire dans Un registre où d’'Un registre dans un autre. Ceci 
est rendu possible par une instruction fondamentale, l'instruction 


de chargement ld {load}: 
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ld a,n charge la valeur n dans l’accumulateur. n est Une entrée 
directe d’un octet. nn signifierait, bien sr Lniquement avec un 
registre double, Une entrée immédiate également mais de deux 
octets (fort et faiblel. S1 Jles deux nn sont entre parenthèses, 
celà signifie par contre qu’il ne s’agit plus d’une entrée directe 
mais que le contenu de l'adresse nn doit être chargé dans le 


registre considéré. 


1d h1,1&A000) signifie que le contenu de l’adresse A000 doit être 


chargé dans le double-registre h1. 


Pour charger le contenu de l’accumulateur dans un autre registre, 
par exemple le registre c, 11 suffit d'entrer: l1d c,a. Le contenu 
antérieur du registre c sera effacé mais pas celui du registre a 


qui se retrouvera en outre dans le registre c. 


Pour programmer en langage-machine, on a besoin d’une zone de 
stockage protégée, qui ne puisse pas être effacée par un programme 
BASIC. La séquence d'instructions suivante vous permet de 
constituer au dessus de la mémoire BASIC une zone libre dans 
laquelle Vous pourrez placer les routines que nous allons décrire 


dans les pages suivantes: 

MEMORY &1FFF:PRINT HIMEM:NEW 

Si vous avez auparavant créé des caractères redéfinis, éteignez 
puis rallumez votre ordinateur pour les effacer car sinon vous 
pourriez avoir de petits problèmes. 


Vous avez maintenant une zone libre de 34 kilooctets pour vos 
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programmes en langage-machine, mais 11 ne vous reste plus que 7.5 
kilo octets pour vos programmes en BASIC. 
Entrez maintenant : 


POKE &2000,&3E:POKE &2001,8FF:POKE &e2002 ,8&C9 


Les instructions POKE ci-dessus écrivent des Ainstructions en 
langage-machine dans la mémoire. 

Les valeurs placées à la suite de l'instruction POKE sont les 
adresses dans lesquelles doivent être placées les instructions. 
Elles sont comparables aux numéros de ligne en BASIC. La valeur 
&3E est le code de l'instruction Ild a,n. La valeur &FF est 
l'opérande n de cette instruction. La valeur &C9 est mise pour RET 
(RETURN) qui marque à la fin d’un programme en langage-machine 


l'ordre de retourner au BASIC. 

Lancez maïîntenant le programme avec CALL (&2000) 

Après Un très court instant, l'ordinateur affiche READY et vous ne 
pouvez encore Vous rendre compte de ce qui s'est passé. Pourtant 
la valeur &FF a bien été chargée dans l’accumulateur, mais ceci 
n'a pas d'effet direct sur l'ordinateur. 

Essayez maintenant d'entrer la routine: l1d bc,&A1F1 en entrant: 
POKE &2000,8&1 l€= I1d bc,nn) :POKE &2001,8F1 loctet faible du 


nombre) :POKE &2002,&A1 loctet fort du nombre) : POKE &2003,&C9 


(RET). 
Lancez maintenant le programme avec CALL (1&2000) 
Après Un très court instant, l'ordinateur affiche READY et vous ne 
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pouvez encore Vous rendre compte de ce qui s’est passé. Pourtant 
la Valeur &FF a bien été chargée dans l'accumulateur, mais ceci 


n'a pas d’effet direct sur l'ordinateur. 


Essayez maintenant d'entrer la routine: 1d be,&A1F1 en entrant: 
POKE &2000,&1 («=> Id bc,nn) :POKE &2001,8F1 [octet faible du 
nombre) :POKE &2002,&A1 (octet fort du nombre) : POKE &2003,8&C9 
(RET). 


Vous ne Voyez toujours aucune différence, mais la Valeur &A1F1 a 
bien été chargée dans le double-registre bc. Notez à ce propos une 
règle fondamentale de la programmation qui est que tout opérande 
16 bits d’Une instruction doit toujours être présenté dans le 


format octet faible-octet fort {low-high}). 


Essayons maintenant des routines plus utiles, par exemple un 


programme d’addition de nombres de 1 octet. 


Nous nommerons les deux octets à additionner ADD1 et ADD2 et nous 
les placerons respectivement dans les adresses &3001 et &3002; le 
résultat ra en &3004. I1 mous faut maintenant trouver une 
possibilité d’additionner ces deux Valeurs. Nous allons placer 
ADD1 dans l’accumulateur, et l'adresse d'ADD2 dans le registre h1: 
ld a,(&3000) et 1d h1,&3002. Nous n'avons pas placé ADD2 
directement en hl pour Vous montrer les possibilités de la 


programmation. 
L'instruction d’addition est: add a,ih1}). Le contenu de l'adresse 
se trouvant dans le registre entre parenthèses (h1} sera donc 


additionné à l’accumulateur. 
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Pour placer le résultat, qui se trouve dans l'’accumulateur, en 
&300%, nous avons l'instruction: 1d (&300%}),a. L’instruction RET 
nous permettra enfin de revenir au BASIC. Voici notre petit 
programme récapitulé avec les codes correspondants qu’il vous 


faudra entrer en mémoire: 


1d a,(&3000) &3A &00 &30 
1d h1,8&3002 &21 &02 &30 
add a,lhl} &86 
1d 1&3004),a &32 &0% &30 
RET &c9 


Voici maintenant Un petit programme qui vous permettra d'entrer ce 


programme à partir du BASIC: 


10 FOR N=&2000 TO &200A 
20 INPUT VALEUR 
30 POKE N, VALEUR 


40 NEXT 


11 vous faut encore placer deux nombres (inférieurs à 128) dans 


les adresses &3000 et &3001: POKE &3000 ,ADD1:POKE &3001,ADDa. 


Entrez CALL &2000. Vous pouvez maintenant vérifier avec 


2PEEK(&3004) que le résultat de l'opération a bien été placé en 


&300%. 


Examinons maintenant le fonctionnement de l'addition de codes 


binaires: 
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ADD1 vaut 127 et ADD 64. 


ADD1= 01111111 


ADD2= 01000000 


RES = 10111111 = 191 en décimal 


Le principe est simple: si Un bit d’une des deux valeurs à 
additionner est mis alors que le même bit de l’autre valeur n'est 
pas mis, le bit correspondant du résultat sera mis. Si les mêmes 
bits des deux valeurs ne sont pas mis, le bit correspondant du 
résultat vaudra également 0. Si les mêmes bits des deux valeurs à 
additionner sont mis, le bit correspondant du résultat vaudra 0 
mais Une retenue 8e produira qui sera prise en compte pour 
l'addition du bit placé à gauche du bit actuel [voyez dans notre 
exemple les bits 6 et 7). Si la retenue se produit lors du calcul 
du bit 7, bit le plus à gauche, celle-ci me sera pas prise en 
compte dans les opérations sur 8 bits mais elle le sera par contre 
pour les opérations sur 16 bits. C’est pourquoi dans l’exemple ci- 
dessus nous vous demandions de ne pas Utiliser de nombres 


supérieurs à 127, afin d'éviter qu'une retenue puisse se produire. 


Essayons maintenant de réalisex une addition sur 16 bits. I1 nous 
faudra tout d’abord deux adresses pour placer les valeurs à 
additionner: ADD1 ira en &3001 (ADR1) et &3000 (ADR1-1) et ADD2 
ira en &3003 (ADR2) et &3002 (ADR2-1). Le résultat ira en &3005 
(RES) et &300%4 (RES-1). 


Notre programme additionnera tout d’abord les deux octets faibles 


de nos deux Valeurs. Si Une retenue se produit, le flag carry 
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{signe de retenue) sera mis. I] sera exploité dans la seconde 


partie de notre programme. 


La seconde partie du programme additionnera les deux octets forts 


en prenant en compte Une éventuelle retenue: 


ld a,(ADR1) charge l'octet faible d’ ADD1 dans 
l’accumulateur 
ld h1,ADR2 charge l'adresse de l’octet faible d’ADD2 


dans le registre h1 


add a,ih1) additionne les octets faibles entre eux 
ld (RES),a stocke l’octet faible du résultat en RES 
ld a,(ADR1-1) charge l'’octet fort d'’ADD1 dans 


l'accumulateur 


dec h1 ôte 1 de h1 

\ 
adc a,lh1l) additionne les octets forts et la retenue 
id (RES-1),a stocke l’octet fort du résultat en RES-1 


L'instruction dec hl a le même effet que ld hl,ADR-1. En effet 
cette instruction diminue de 1 le contenu de h1 qui de ADR1 
devient donc bien ADR1-1. L'avantage de l'instruction dec est 
qu'elle ne prend qu'un octet et est donc plus élégante et plus 


rapide. 
L'instruction adc a,ihl) a le même effet que add a,lhl) si ce 
n'est qu’elle prend en compte en outre la retenue qui a pu se 


produire lors de la dernière opération. 


Voici maintenant à nouveau notre programme avec les codes 


hexadécimaux que vous devez entrer: 
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id a,(&3001) &3A &1 &30 


1d h1,83003 &21 &3 &30 
add a,lh1) &86 
1d (1&3005),a &3e &S &30 
id a,(&30001) &3A 00 &30 
dec h1 &e2B 
adc a,lthl} &8E 
1d (&3004),a &3e2 &4 830 
RET &Cc9 


Entrez ce programme avec le petit programme BASIC que nous vous 


avons fourni après avoir ainsi modifié la ligne 10: 


10 FOR N=82000 TO &2012 


Entrez maîintenant en mémoire les Valeurs à additiomner en suivant 


le format octet fort-octet faible. Par exemple, pour entrer &5F4#C 


et &8BSA: 


POKE &3000,8&5F:POKE &3001,&4C:POKE &3002,&8B:POKE &3003,&5A 


Entrez ensuite CALL (&2000) puis: 


PRINT PEEK(&3004 )#256+PEEK(&3005) 


Vous Voyez maintenant apparaître le résultat, 60070 dans notre 


exemple. 


Lors d’une addition sur 8 bits dont le résultat est supérieur à 


&FF, nous avons donc vu qu'une retenue se produit qui est placée 
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dans le flag CARRY. Ce flag est Un bit du registre f, un registre 
que nous n'avons pas encore évoqué. Ce registre contient toutes 
les informations essentielles dont le microprocesseur a besoin. Le 


flag carry est le bit 0 du registre f. 


Passons à Une autre application en langage-machine: nous allons 
essayer de placer des points sur l'écran. Nous pouvons le faire en 
BASIC soit avec l'instruction PLOT soit en pokant les points 


directement dans la mémoire écran: 


10 MODE 2 

20 FOR N=&C000 TO 8&FFFF 
30 POKE N,&FF 

40 NEXT 


Vous voyez que l'écran se remplit, mon pas ligne par ligne 
cependant, mais Une ligne sur huit, conformément à Jla structure 


des caractères que nous avons décrite plus haut. 


Pour bien comprendre la logique du programme en langage-machine 
que nous allons vous présenter, il faut Voir que la boucle ci- 


dessus peut fort bien être écrite ainsi: 


10 N=N+1 


20 IF N=&FFFF THEN END 


On pourrait cependant écrire cette boucle en langage-machine même 
sous sa première forme mais ceci nous entraînerait à expliquer 
plus de nouvelles instructions que mous me le souhaitons pour 


l'instant. 
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Nous voulons donc charger &FF dans toute une série d'adresses de 
la mémoire. Nous utiliserons l'instruction 1d mais pour ne pas 
réécrire l'instruction de chargement pour chaque adresse 
concernée, il nous faut créer Une boucle, par exemple avec le 


registre b qui est facile à contrôler. 


longueur représentera la longueur de la zone à remplir. 


adri sera l’adresse de départ du remplissage. 


Nous créons la boucle avec: 1d b, longueur. Nous plaçons ensuite 
&FF dans l’accumulateur. En plaçant ADR1 en hl nous créons ce 
qu’on appelle un "pointeur", qui sera dirigé sur l'adresse de 
départ du remplissage. Nous chargeons ensuite le contenu de 
l'accumulateur &FF dans l'adresse indiquée par le pointeur h1l. I1 
nous faut maintenant augmenter h1l de 1 {inc h1} pour qu'il pointe 
sur l'adresse suivante à remplir. Nous devons également diminuer 
de 1 le registre b (dec b}l qui va nous servir de compte à rebours 
du nombre d'adresses à remplir. 

L'instruction suivante devra être un saut conditionnel 
correspondant au BASIC IF... THEN GOTO... 11 nous faut en effet 
sauter à l'instruction Id ({hl),a chaque fois que hl a été 
incrémenté. Le saut doit se faire tant que le registre b sera 
différent de 0, et donc tant qu’il restera des adresses à remplir. 
L'instruction adéquate est jp mz, adresse. jp signifie saut; nz 
signifie non zero; le saut se produira donc tant que le résultat 
de la décrémentation du registre b sera non nul. Notre programme 


doit être bien sÛr terminé par un RET: 


1d b,&c0 &é &C0 


1d a,0 &3E &FF 
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ld h1,&C000 &21 &0 &C0 


id (hl},a &77 

inc h1 &e3 

dec b &s5 

jp nz,8&2007 &Cce &7 8&20 
RET &Cc9 


Entrez les codes avec le même programme que tout à l’heure, avec 


une boucle allant de &2000 à &200D. 


Avant de lancer le programme avec CALL &2000, entrez MODE 2, même 


si vous vous trouvez déjà dans ce mode. 


Vous Voyez que trois lignes ont été dessinées par notre routine. 


L'instruction de saut jp {jump} saute à l'adresse où figure 
l'instruction 1d {hl}l,a. Ceci est rendu techniquement possible par 
Un autre registre très Âimportant du microprocesseur, le PC 
{programmcounter} ou compteur de programme. Ce registre contient 
l'adresse de la prochaine instruction à exécuter. L’instruction jp 
écrit donc dans ce registre l'adresse à laquelle on veut sauter. 

Une autre instruction de saut, l'instruction jr procède de manière 
légèrement différente: cette instruction soustrait en effet où 
additionne au contraire suivant le cas le paramètre qui lui est 
affecté au compteur de programme. C’est ce qu'on appelle un saut 
relatif: jr e entraînera un saut à ]l'’adresse actuelle plus ou 
moins le paramètre e. Ce chapitre n'étant qu’une introduction, 
nous nous cantonnerons ÂÎci à ces explications sommaires du 


fonctionnement des instructions de saut. 
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JEUX DE CARACTERES ET D’ INSTRUCTIONS 


Voici Une table des caractères et des mnémoniques de votre CPC 


avec les codes hexadécimaux et décimaux correspondants. 


Code Caract. Hex Assembleur Z 80 d’après CBh d'après EDh 


O Null O0 nop rlc b 

1 SOH 01 1d bc,NN ric c 
2 STX 02 ld (bc),a ric d 
3 ETX 03 inc bc rlce 
4 EOT O4 inc b rlch 
S ENQ 05 dec b ric 

6 ACK 06 1d b,N rlc (h1l) 
: BEL 07 rlca rie a 
8 BS O8 ex af,af" rrc b 
3 HT 09 add h1l,bc Irc c 
10 LF OA ld a,(bc) rrc d 
11 VT OB dec bc rrc e 
12 FF OC inc c rrc h 
13 CR OD dec c rre 1 
14 so OE ld c,N rre (h1l) 
15 SI OF rrca rrc a 
16 DLE 10 djnz DIS rl b 
17 DC 1 11 ld de,NN rl c 

18 DC 2 12 ld (de),a xl d 
19 DC 3 13 inc de rl e 
20 DC 4 14 inc d rlh 

21 NAK 15 dec d rl 

22 SYN 16 ld d,N rl (h1) 
23 ETB 17 rla rl a 
24 CAN 18 jr DIS rxrr b 

25 EM 19 add h1l,de rr cC 
26 SUB TA ld a,(de) rr d 

27 ESC 1B dec de rr e 
26 FS 1C inc e rrh 
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29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
43 
50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 
65 


GS 
RS 
US 


SP 
! 


CHR$ (35) 


Chr$(39) 
( 
) 


* 
+ 


Chr$(45) 


D D 1 A U » & N = © — 


Chr$(60) 


Chr$(62) 
? 
Chr$(64) 
À 


1 
1E 
1F 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
2A 
2B 
2C 
2D 
2E 
2F 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
3A 
3B 
3c 
3D 
3E 
3F 
40 
at 


dec e 

ld e,N 
rra 

jr nz,DIS 
ld h1,NN 
Id(NN),hl 
inc hl 
inc h 

dec h 
ld,h,N 
daa 

jr z,DIS 
add hl,hl 
ld hL,(NN) 
dec hi 
inc 1 

dec 1 

id 1,N 
cpl 

jr nc,DIS 
1d sp,NN 
1d (NN),a 
inc sp 
inc (h1) 
dec (h1l) 
id Chl),N 
scf 

jr c,DIS 
add h1l,sp 
1d a, (NN) 
dec sp 
inc a 

dec a 

ld &,N 
ccf 

1d b,b 

id b,c 
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rr 
Tr ( 
1r à 
sla 
sla 
sla 
sla 
sla 
sla 
sla 
sla 
sra 
sra 
sra 
sra 
sra 
sra 
sra 


sra 


srl 
sri 
srl 
srl 
srl 
srl 
srl 
srl 
bit 
bit 


h1) 


Bee 00: 0 0. 


(hi) 


HT ® & n vo bp 


(h1) 


£a 


h 

L 
(h1) 
a 
0,b 
0,c 


in b,(c) 


out 


(c),b 


66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
30 
91 
92 
93 
94 
95 
96 
97 
938 
99 
100 
101 
102 


DO MOZEZERUMEZIOQ nn MON 


N KXE<C AV 


Chr$(91) 
Chr$(92) 
Chr$(93) 


Chr$(95) 
Chr$(96) 


a 
b 
c 
d 
e 
f 


42 
43 
44 
45 
46 
47 
48 
49 
4A 
4B 
ac 
4D 
4E 
4F 
so 
51 
52 
53 
54 
55 
56 
57 
58 
59 
SA 
5B 
sc 
5D 
SE 
SF 
60 
61 
62 
63 
64 
65 
66 


la 
ld 
ld 
là 
1d 
la 
ld 
ld 
là 
la 
ld 
là 
ld 
ld 
là 
ld 
la 
lä 
là 
ld 
ld 
ld 
ld 
ld 
ld 
là 
ld 
ld 
ld 
ld 
là 
l1d 
là 
ld 
1d 
ld 
ld 


b,d bit 
b,e bit 
b,h bit 
b,1 bit 
b,(hl) bit 
b,a bit 
c,b bit 
c,c bit 
c,d bit 
ce bit 
c,h bit 
c.1l bit 
c,(hl) bit 
c,a bit 
d,b bit 
da,c bit 
d,d bit 
d,e bit 
d,h bit 
d,l bit 
d,(h1) bit 
d,a bit 
e,b bit 
e,c bit 
e,d bit 
e,e bit 
e,h bit 
e,l bit 
e,(h1) bit 
e,a bit 
h,b bit 
h,c bit 
h,d bit 
h,e bit 
h,h bit 
h,1 bit 
h,(h1) bit 
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0,d 
0,e 
0,h 
0,1 
O,(h1) 
0,a 
1,b 
1,c 
1,d 
1,e 
1,h 
1,1 
1, (h1) 
1,a 
2,b 
2,c 
2,4 
2,e 
2,h 
2,1 
2,(h1) 
2,a 
2,b 
3,c 
3,d 
3,e 
3,h 
3,1 
3,(h1) 
3,a 
4,b 
4,c 
4,d 
4,e 
4,h 
4,1 
4,(h1) 


sbc hl,bc 
1ld(NN),bc 
neg 

retn 

im O 


inc c,(c) 
out (c),c 
adc hil,bc 
ld bc, (NN) 


reti 


in d,(d) 
out (c),d 
sbc hl,de 
14 (NN),de 


im 1 

ld a,i 

in e,(c) 
out (c),e 
adc hl,de 
id de, (NN) 


im 2 


‘in h,(c) 


out (c),n 
sbc h1,hl 
1d (NN),h1 


103 
104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
431 
132 
133 
134 
135 
136 
137 
138 
139 


NNKXE£E<E tu h A M 05 3 rx LU + 7 a 


AO ME T > 2 Q 


mMmEIAnn mn 


67 
68 
69 
6h 
6B 
6c 
6D 
6E 
6F 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
7A 
7B 
7C 
7D 
7E 
7F 
80 
81 
82 
83 
84 
85 
86 
87 
88 
83 
8A 
8B 


la 
ld 
1d 
ld 
id 
id 
ld 
ld 
ld 
ld 
là 
la 
ld 
ld 
ld 
hal 
ld 
id 
id 
ld 
ld 
ld 
ld 
id 
là 
add 
add 
add 
add 
add 
add 
add 
add 
adc 
adc 
adc 


adc 


(h1),b 
{hl),c 
{h1),d4 
{hl),e 
G1),h 
(h1),1 
t 
(hl),a 
a,b 
a,c 
a,d 
a,e 
a,h 
a,l 

a, (h1l) 
a,a 
a,b 
a,c 
a.d 
a,e 
ah 


a,(h1l) 
a,a 
a,b 
a, c 
a,d 


a,e 
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bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 


res 


7,4 
7,e 
7,h 
7,1 
7,(h1) 
7,a 
0,b 
0,c 
0,4 
0,e 
o,h 
0,1 
O,(h1) 
0,a 
1,b 
1,c 
1,d 


1,e 


xrd 

an 1,(c) 
out (c),1 
adc hl,n]l 
la de, (NN) 


rld 


sbc h1l,sp 
ld (NN),sp 


in a,(c) 

out (c),a 
adc h1l,sp 
ld sp, (NN) 


140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 
162 
163 
164 
165 
166 
167 
168 
169 
170 
171 
172 
173 
174 
175 
176 


Un Z mMm x 


8c 
8D 
BE 
eF 
30 
31 
32 
93 
94 
35 
936 
97 
98 
939 
SA 
9B 
sc 
he) 
9E 
9F 
AO 
Ai 
A2 
A3 
A4 


5 
5 


A6 
A7 
AB 
A9 
AA 
AB 
AC 
AD 
AE 
AF 
BO 


adc 
adc 
adc 
adc 
sub 
sub 
sub 
sub 
sub 
sub 
sub 
sub 
sbc 
sbc 
sbc 
sbc 
sbc 
sbc 
sbc 
sbc 
and 
and 
and 
and 
and 
and 
and 
and 
xor 
xor 
xôr 
xor 
xor 
xor 
xor 
xor 


or b 


h1) 


a 
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res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 


res 


1,h 
1,1 
1,(h1) 
1,a 
2,b 
2€ 
2,d 
2,e 
2,h 
PE 
2,(h1l) 
2,a 
3;b 
3,c 
3,4 
3,e 
3,h 
3,1 
3,(h1) 
3,a 
4,b 
4,c 
4,d 
4,e 
4,h 
4,1 
4,(h1) 
4,a 
5,b 
5,c 
5,d 
5,e 
5,h 
5,1 
5,(h1) 
5,a 
6,b 


cpi 
ini 


outi 


läa 
cpd 
ind 


outd 


ldir 


177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199 
200 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 


B1 
B2 
B3 
B4 
B5 
B6 
B7 
B8 
B93 
BA 
BB 
BC 
BD 
BE 
BF 
co 
c1 

C2 
C3 
C4 
c5 
c6 
C7 
c8 
c9 
CA 
CB 
cc 
CD 
CE 
CF 
DO 
D1 

D2 
D3 
D4 
D5 


or 
or 
or 


or 


et O0. D 0 


or 
or (h1) 
or 
cp 
cp 
cP 
cp 
cp 
CP 
cp (hl) 


cp a 


Re RE ONE Te OR: OR 


ret nz 
pop bc 
jp nz,NN 
jp NN 
call nz,NN 
push bc 
add a,N 
rst O 
ret 2 
ret 

jp Zz,NN 


call Zz,NN 
call NN 
adc a,N 
rst 8 

ret nc 

pop de 

jp nc,NN 
out N,a 
call nc,NN 
push de 
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res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 


set 


6,(h1) 
6,a 
7,b 
7,c 
7,4 
7,e 
7,h 
FRE 0 
7,(h1) 
7,a 
0,b 
O,c 
0,d 
0,e 
O,h 
0,1 
0,(h1) 


1, (h1) 
1,a 
2,b 
2,c 
2,d 
2,e 
2,h 
2,1 


cpir 
inir 


otir 


lddr 
cpdr 
indr 


otdr 


214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 


251 
252 
253 
254 
255 


D6 
D7 
D8 
D9 
DA 
DB 
DC 
DD 
DE 
DF 
EO 
Ei 
E2 
E3 
E4 
E5 
E6 
E7 
E8 
E9 
EA 
EB 
EC 
ED 
EE 
EF 
Fo 
F1 
F2 
F3 
F4 
F5 
F6 
F7 
F8 
F9 
FA 


FB 
FC 
FD 
FE 
FF 


sub N 

rst 16 
ret c 

exx 

jp c,NN 
in a,N 
call C,NN 


sbc a,N 
rst 24 

xet po 

pop hl 

jp Po, NN 
ex (sp),h1 
call po,NN 
push hl 
and N 

rst 32 

ret pe 

jp (h1) 

jp pe, NN 
ex de,hl 
call pe,NN 


xor N 
rxst 40 
ret p 
pop af 
jp P:NN 
di 

call p,NN 
push af 
or N 
rst 48 
ret m 

ld sp,hl 
jp m,NN 


ei 
call m,NN 


cp N 
st 56 
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set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 


set 
set 
set 
set 
set 


2,(h1) 
2,a 
3,b 
3,c 
3,4 
3,e 
3,h 
3,1 
3,(h1) 
3,a 
4,b 
4,c 
4a,d 
4,e 
a,h 
4,1 
4,(h1) 
4,a 
5,b 
5,c 
5,d 
5,e 
s,h 
5,1 
5,(h1) 
S,a 
6,b 
6,c 
6,d 
6,e 
6,h 
6,1 
6,(h1) 
6,a 
7,b 
7,c 
7,4 


7,e 
7,h 
7,1 
7,(h1) 
7,a 


&.4 LA MEMOIRE DU CPC 464 


Il est important de connaître la structure de la mémoire de votre 


ordinateur, de façon à ce que Vous puissiez en tirer le maximum. 


Le CPC 464 est doté d'un microprocesseur Z 80 qui est un 


processeur 8 bits avec 16 canaux d'adresses qui lui permettent 


d'adresser 2116 - 65536 cases mémoire différentes, chacune 
comportant 8 bits et pouvant donc contenir 218 = 256 valeurs 
différentes. 


Le CPC 464 contient 64 K octets de RAM et 32 K octets de ROM. 
Comme le processeur ne peut adresser que 64 K octets un 
commutateur permet au processeur de choisir s’il veut à un moment 
donné adresser la ROM où la RAM qui figurent aux mêmes adresses. 
11 peut ainsi utiliser pleinement la capacité réelle de 96 K de 
votre ordinateur. Toutefois, dans les opérations d'écriture, le 
processeur choisit automatiquement la RAM puisqu'il n'est par 


définition pas possible d'écrire dans la ROM. 


Le CPC 464 possède Un composant de la ROM qui contient l’ensemble 
des 32 K octets dont celle-ci se compose. Les 16 K octets 
inférieurs constituent le système d'exploitation {de 0 à &3FFF - 
16383). Les 16 K octets supérieurs constituent l’interpréteur 


BASIC qui est placé de 8&C000 à &FFFF (49152 à 65535). 


Voici une figure illustrant ce principe: 
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CARTE DE LA MEMOIRE DU CPC #6# 


BEFFE p---------) f---------- 65535 
BASIC 
&CO00 —---------- 49152 
RAM 
&4000 p--------- 16384 
S/STEME 


DE YPLO TATNON 


80000 L---------1 L-__------- 0 
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#.4.1 L'OCCUPATION DE LA MEMOIRE PAR LE BASIC ET LE SYSTEME 
D'EXPLOITATION 


La plus grande partie de la mémoire RAM sert au stockage du 
programme BASIC en mémoire et de ses variables. Cette zone occupe 
normalement les adresses &170 (368) à &AB7F (43903). Sa taille est 


donc de 43536 octets. 


Lorsque vous lisez la mémoire avec PEEK, vous obtenez toujours le 
contenu de la RAM. I1 n’est donc pas 51 facile de lire le contenu 
de la ROM. Le programme de moniteur que nous Vous présentons plus 


loin vous permettra toutefois, entre autre, de le faire. 


Voyons maintenant comment est structurée la mémoire RAM: les 64 
premiers octets de cette mémoire sont Une copie conforme de la 
même zone de la ROM qui contient les routines restart qui peuvent 
être appelées par Une instruction sur Un octet. Ces 8 vecteurs RST 
servent sur le CPC 464 à appeler des routines de la RAM ou de la 
ROM. Ils choisissent automatiquement la bonne mémoire. La RAM 
contient Une copie de ces routines de façon à ce que celles-ci 
puissent être aussi bien exécutées lorsque la ROM est déconnectée 


que lorsqu'elle est connectée. 


Comme ces routines RST sont abondamment utilisées par le système 
d’'exploiîtation ainsi que par l’interpréteur BASIC, nous allons en 
décrire quelques-unes. Vous trouverez d'autre part dans notre 
programme de moniteur Une Utilisation de la routine RST 3 qui 


permet de lire le contenu de la ROM. 
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#.S LES INSTRUCTIONS RST 


RST 0 Adresse &0000 


Ce vecteur provoque Un reset complet de l’ordinateur de même que 
la mise sous tension de l'appareil ou le fait d'appuyer 


simultanément sur les touches CTRL SHIFT ESC. 


0000 01 89 7F LD BC,8&7F89 
0003 ED #9 OUT (C),C 
0005 C3 80 05 JP &0580 


L’'instruction OUT sélectionne la ROM et saute à la routine &0580 


de 1a ROM. 

Vous pouvez provoquer Un reset en BASIC avec CALL 0, en langage- 
machine avec CALL 0, JP 0 ou RST 0. 

RST 1 Adresse &0008 

Cette instruction permet d’appeler une routine du système 
d’exploition ou de la RAM qui le double. Comme 14 bits suffisent 
pour la zone entre 0 et &3FFF, les deux autres bits servent à 
sélectionner la RAM ou la ROM: 

Bit 1% = 0 =) sélection du système d'exploitation 


Bit 1% = 1 =) sélection de la RAM 
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Bit 15 


0 =) sélection de la ROM BASIC 
Bit 15 


[) 


1 =) sélection de la RAM 


Par exemple, pour appeler la routine du système d'exploitation 


&0826, nous aurions: 


RST 1 


DW &0826 + &8000 


Le bit 15 est mis par + &8000, ce qui sélectionne la zone entre 
&C000 et &FFFF, alors que le bit 14 est à 0, ce qui sélectionne le 
système d'exploitation au lieu de la RAM. Le code de l'adresse 8 


est Uniquement Un saut en &B982. 


RST 2 Adresse &0010 


Cette routine restart 5e compose d’un saut en &BA16 et permet 
d'appeler une routine dans une ROM d'extension. Après 
l'instruction RST 2 doit figurer l'adresse de la routine -&C000, 
c'est-à-dire l'adresse relative de cette routine par rapport au 
début de la ROM. Les deux bits supérieurs du paramètre permettent 


de sélectionner quatre ROMs différentes. 


RST 3 Adresse &0018 


Cette routine comporte Un saut en &B98F. Elle permet d'appeler une 


routine figurant en n'importe quel endroît de la RAM ou de la ROM. 


Cette instruction doit être utilisée avec un bloc de paramètres 
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comportant trois octets. Les deux premiers octets indiquent 
l'adresse de la routine et le troisième l’état ROM/RAM souhaité. 
Les valeurs 0 à 251 permettent d'appeler la ROM supplémentaire 


correspondante alors que les 4 valeurs restantes ont les fonctions 


suivantes: 

Valeur &0000-&3FFF &C000-&FFFF 
25e Système d'exploitation BASIC 
253 Système d'exploitation RAM 

254 RAM BASIC 

255. RAM RAM 


RST # Adresse &0020 


Cette routine comporte Un saut en &BACB. Elle permet de lire à 
partir d'Un programme en langage-machine le contenu de la RAM, 
quel que soit l’état choisi de la ROM. L'’instruction RST #4 


remplace l'instruction LD A,1HL) 


HL doit donc contenir l'adresse de la case de la mémoire RAM à 


lire. 


RST 5 Adresse &0028 


Cette routine comporte Un saut en &BA2E. Elle permet de sauter à 


une routine du système d'exploitation. L'adresse doit être placée 


à la suite de cette instruction. 
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RST 6 Adresse &0030 


Cette instruction RST n'est pas utilisée par le système 
d'exploitation et peut donc être librement définie par 
l'utilisateur, par exemple, dans un debugger, pour placer un point 


d'arrêt [breakpoint)}. 


RST 7 Adresse &0038 


Cette routine comporte Un saut en &B939. Comme le Z 80 fonctionne 
en mode d’interruption 1, l'apparition d’une interruption provoque 


un RST 7. Cette instruction traite l'interruption. 
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4.6 MINI-MONITEUR 


Voici maintenant un programme de moniteur qui Vous permet de 
consulter les contenus de la mémoire, de les modifier ou de les 
stocker sur cassette. Une particularité intéressante de notre 
programme est qu’il Vous permet d'accéder à la ROM BASIC et à la 
ROM système d'exploitation. Ceci se produit à travers les 


instructions RST. 


Voici maintenant le listing suivi de la description du programme: 


1 PRINT "CATA EECKER" 
184 MEMORY ESSFFF: INK GL:INE 1,240 IHK ZZS IE 
11& nn per isa TO n'EEAC mage ie MEËT: DATA arm 


124 G 34 
134 FEH € PRINT TA di men i te 0 F'CHRSE LS OTAEN 1G 3; : PEN L:PRINTC 
mme PRINT: PRIH 


HRGE LE CHRIS 1 0 
T 
id on sc "CHR SE LS CHR EE CHR 1 1 



























158 FFINT" 
164 FRIHT" à 
154 FRINT" 
154 PRINT" +: 








machive 


n 


Sortie sur 
:FEM 1: PRINT" er. a PRINT TAF 





"PEN S:PFRINTMIMS PEN CF 





Ge THE NS : MEME: 
THEH MODE 3 


cmd is THEH FREIHT:ON i4i GOSUE 494,544, 590.700 





LHILE 3 
a '#ALE niLs 
FRIHT: PRIT" In 
ARS IHEE TS: FOIE 
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IF 32h THEH RETURH 

PRINTÉC,HEXSC a. du": 

FOR isi TO l: IF rom THEN GOSUR 89G:ELSE 
PRINTÉC HESE x, 2" Miiasati 
HEXT:PRINTÉC." "isaæa-] 

1F cs THEN 459 
FOR i=1 TO l: IF 
#sx AND &7F 

IF xCS2 OR “2127 THEN x=d96 

PRINTÉC, CHRSC x 1; :ama+i: HEXT: PRIHTÉC: GOÛT GE 
IF Le THEN PEN 2 

FOR Isi TO L:IF ROM THEN GOSUE SGG:ELSE #“2=PEEKC A2 
PRINT CHRS 1 CHARGE 05 : AsA+1: HEST PRINT: FEH 1:GOTO 354 


KaPEEKS à 


rom THEH GOSUR S9G:ELSE %=PEEKC a 


‘ 


INPUT'adrecse ";x$:GOSLUE SE :azx 





PRINT HEXSGE à, 420"; 

INPUT x$:agzlEFTHi SL: IF agit" OR a@i°9" AND a$i"a" 
GOSUB SéG:FÜKE a,x:a=a+l:GOTO SG 

GOSUB 659: GOSUE 254: RETLUEH 

HS VALE MAS IF et THEN 

RETURH 

4 


PRINT'Sauvenarder: "3 
GOSUE 650 

INPUT "Horn "533$ 

SAVE a$b,3,b-a 
RETURH 


INPUT'de — a ":a$,b$ 
xhza$: GOSUE S64:aex 
x$eb$:GOSUE S64:bhex 
RETURH : 
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OF a$:"$" THEH RETURI 







IHPUT"Adres 
LINE INPUT'Entrer ct 
IF LAN agi THEH Fi 
FETUFH 


CMICRE AR. di, LU MEKT 





PRTHT THE 5 







FRIHTMUE "iCPEH IF rom THEN FRÉIHT"EUNM" 
FEH T'agzIt : ag=" " THEH + 
IF 4heCHRSE 132 THEH FRINT:IME 5 







 PRTHTRAN 








lavaañe-maichine 


354 CLS: END 
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Description du programme de mini-moniteur: 


130-140 


150-220 


230-260 


270-300 


Diminution de la limite supérieure de la RAM BASIC, 


définition des couleurs et choix du mode écran 


Lecture des instructions qui sont placées dans cmd 


Edition du titre. Utilisation du mode transparent pour 


le soulignage 


Affichage du jeu d'instructions et des lettres 


permettant de les appeler 


Définition du périphérique de sortie pour l'instruction 


M 


Suivant ce que Vous avez choisi, le nombre d’octets par 
ligne est fixé à 16 pour Une sortie sur imprimante et le 
numéro de canal à 8. Si vous avez opté pour la sortie 
sur écran, vous pouvez encore choisir entres les modes 


80 et 40 caractères. 
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310-330 


350-390 


400-470 


90-520 


540 


Boucle principale d'attente des entrées. Les caractères 
entrés sont comparés aux commandes des différentes 
instructions et, en cas d'identité, on saute à la 


routine voulue. 


HEX-DUMP: une fois l'adresse entrée, 1 (8 ou 16) octets 
sont édités sous forme de nombres hexadécimaux. La 
lecture de la RAM peut se faire simplement par des PEEK 
mais la lecture de la ROM ne peut se faire que par la 


routine 890. 


ASCI I-DUMP : pour l'édition des caractères ASCII 
correspondant au contenu d’une zone de la mémoire, on 
examine tout d’abord si la sortie doit se faire sur 
l'écran ou sur l'imprimante. Pour Une sortie sur 
imprimante, on supprime le bit supérieur du caractère. 
Lorsqu'il s'agit d’un caractère de contrôle, celui-ci 
est remplacé par Un point. Pour la sortie sur écran, 


tous les caractères sont représentés grâce à CHRS(1). 


Cette routine permet de modifier le contenu de la 
mémoire. Après que Vous ayez entré Une adresse, vous 
pouvez entrer son nouveau contenu. L'adresse suivante 
est alors automatiquement affichée et on attend votre 
nouvelle entrée. Vous pouvez sortir de ce mode en 


entrant un point. 
Les deux appels de sous-programmes traitent 
l'instruction M. 650 vous permet d'entrer les adresses 


de début et de fin de la zone à afficher et la seconde 
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560-570 


590-630 


650-680 


700-730 


750-760 


780-810 


830-870 


sous-routine réalise l'affichage. 


Cette routine transforme une suite de chiffres 
hexadécimaux en une Valeur numérique et vous épargne 


ainsi d’avoir à utiliser le '&’'. 


Cette routine Vous permet d'effectuer une sauvegarde 
d’une zone de la mémoire sur cassette. Vous devez entrer 
les limites de la zone à sauvegarder ainsi que le nom 


que vous souhaitez lui donner. 


Cette routine Vous permet d'entrer les limites d’une 
zone de la mémoire qui sont placées dans les variables a 


et b. 


Cette routine vous permet d'entrer Un texte directement 
en mémoire. La ligne 720 poke le texte caractère par 


caractère en mémoire. 


Ces deux lignes Vous permettent de faire exécuter un 
programme en langage-machine 5e trouvant en mémoire. 


Vous indiquez l'adresse du programme à exécuter. 


Cette routine Vous permet de sélectionner entre ROM et 
RAM. L'état actuellement sélectionné clignote. Pour 
passer de lo ROM à la RAM et vice Versa, il vous suffit 
d'appuyer sur la touche espace. Une fois l’état voulu 


sélectionné, appuyez sur ENTER. 


Le programme en langage-machine permettant de lire la 
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ROM figure en lignes de DATA. La ligne 870 place ce 


programme dans l'endroit voulu de la mémoire. 


890-930 Ici se produit la lecture d’un octet de Jla ROM. 
L'adresse de l'’'octet à lire est placée dans la variable 
a. Cette adresse, divisée en octets fort et faible est 
placée dans la routine en langage-machine. Cette routine 
place le résultat de la lecture en &AB0E où il peut être 


lu par un PEEK. 


950 X provoque l'effaçage de l'écran et la fin du programme. 


Pour lire la ROM, mous utilisons une routine du système 
d'exploitation que nous appelons grâce à RST 3. La définition de 
l'octet à lire se fait simplement en pokant les octets fort et 
faible de l'adresse correspondante à la suite de l'instruction Id, 
à l'adresse READROM. Ce n’est qu’'ensuite que la routine est 


appelée. 


Voici maintenant deux exemples d'édition par le moniteur, le 
premier Vous montre Un exemple de contenu de la RAM (programme 


BASICI, le second un exemple de contenu de la ROM. 


0160 
0168 
0170 
0178 
0180 
0188 
0190 
0198 
01A0 
01A8 
01B0 
01B8 


01C0 
01C8 
01D0 
01D8 
01E0 
O1E8 
01FO 
01F8 
0200 


00 
00 
31 
AA 
01 
01 
01 
2C 
00 
EE 
OD 
20 


20 
OD 
01 
73 
78 
1D 
BB 
20 
20 


00 
00 
00 
01 
20 
20 
20 
19 
41 
EF 
OE 
OD 


00 00 
00 00 
64 00 
20 A2 
A2 20 
A2 20 
A2 20 
18 01 
00 6E 
14 20 
00 E9 
05 00 


00 
O0 
AA 
20 
OF 
10 
11 
20 
00 
01 
EF 
EE 


03 09 00 63 


OE 
20 
2C 
00 
06 
20 
28 
69 


00 E9 
8c 20 
74 2C 
OA 00 
OB O0 
10 01 
19 OA 
20 6E 
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29 
61 
67 
78 
6B 
20 
29 
20 


00 
00 
20 
OE 
2C 
2C 
2C 
AD 
OD 
20 
OE 
01 


01 
2C 
2C 
00 
00 
BF 
20 
69 


00 


2C 
19 
19 
19 
20 
O5 
9E 
20 
20 


20 
6D 
72 
9F 
82 
20 
22 
20 


O0 
00 


OF 
18 
17 
OF 
OF 
00 
20 
EC 
c3 


28 
BO 
2C 
2C 
20 
00 
EA 
4D 
2D 


S 


X.. 


-A.N.... 
no. 


.i0. 1 
.n. C 


...cmd( 
.-i1). 0 
a,m, 
rtiQ,Tr, 
De 


? 5 
(..) "M 
in i- 


Cco00 
Cco08 
co10 
co18 
co20 
co28 
co30 
co38 
Co040 
co48 
Cco50 
co58 
CO60 
co68 
070 
co78 


80 
co 
00 
1B 
co 
CD 
BD 
FO 
42 
30 
c3 
co 
43 
00 
DC 
C3 


01 
CD 
00 
23 
CD 
CB 
CD 
00 
g1 
OA 
00 
CD 
CA 
co 
B6 
3A 


00 
CB 
21 
36 
37 
DD 
D3 
CD 
53 
OA 
CD 
9A 
38 
CD 
BC 
45 


00 
BC 
00 
c9 
c3 
CD 
co 
06 
49 
00 
E1 
E7 
54 
62 
CD 
AE 


ac 
CD 
AC 
10 
AF 
84 
CD 
F7 
43 
42 
CE 
CD 
CD 
c1 
48 
B7 
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co 
C4 
36 
FB 
32 
CA 
3E 
18 
20 
41 
co 
63 
01 
CD 
BB 
ca 


31 
F4 
00 
21 
00 
CD 
c1 
25 
31 
53 
31 
E1 
AC 
D6 
CD 
3E 


00 
DA 
06 
3F 
AC 
97 
11 
20 
2E 
49 
00 
CD 
31 
DD 
86 
c1 


....L91. 
MK <MDtZ 

.t.16.. 
.#61.:1!? 
@M7C/2., 
MKäM.JM. 
=MS@M) A. 
p.M.w.*% 
BASIC 1. 
O...BASI 
C.MaN91. 
9M.gMcaM 
CJB8TM. ,1 
.@MDbAMVä 
606 (MH;M. 
C:E.7D)A 


CHAPITRE 5 LIGNES BASIC, VARIABLES ET TOKENS 


5.1 FORMAT D'UNE LIGNE BASIC EN MEMOIRE 


Pour suivre ce chapitre, vous allez avoir besoin du programme de 
moniteur du chapitre 4. Le format des lignes BASIC ainsi que celui 
des variables vous montrera bien comment Votre ordinateur passe du 


langage-machine à Un langage évolué tel que le BASIC. 


Votre ordinateur me peut en effet comprendre directement que des 
codes binaires. C'est le système d'exploitation ainsi que 
l’interpréteur BASIC qui transforment toutes Îles instructions 


BASIC en code binaire. Si vous écrivez la ligne BASIC: 


1 PRINT'DATA BECKER" 


votre ordinateur me peut rien comprendre directement. Même avec 
l'interpréteur, Votre ordinateur ne comprend pas tout et il vous 


le fait savoir, chaque fois qu’il affiche un ’SYNTAX ERROR'. 


Voyons tout de suite Un exemple pratique: ajoutez au programme de 
mini-moniteur la ligne 1 PRINT "DATA BECKER". Lancez le programme 
et faites afficher la zone entre 170 et 183. Voici ce que vous 


obtenez (nous avons transcrit les résultats en décimal): 


-132- 


ADRESSE 


VALEUR 


COMMENTAIRE 


368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378 
379 
380 
381 
382 
383 
384 
385 
386 


387 


Examinons 


191 
32 
34 
68 
65 


84 


32 
66 
69 
67 
75 
69 
82 


34 


maintenant 


octet 

octet 

octet 

octet 

token 

valeur 
valeur 
valeur 
valeur 
valeur 
valeur 
valeur 
valeur 
valeur 
valeur 
valeur 
valeur 
valeur 


valeur 


code de séparation 


sign 


faible de la longueur de ligne 


fort de la longueur de ligne 


faible du numéro de ligne 


fort du numéro de ligne 


pour PRINT 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 
ASCII pour 


ASCII pour 


ification 


espace 
guillemet 
»D* 
“a" 
"y" 
A" 
espace 
“pr 
VE" 
“C" 
"K" 
np" 
“R" 


guillemet 


de tous ces codes: la 


longueur de la ligne BASIC est exprimée par deux octets: 


20 foctet faible) + 256 x 0 [octet fort} = 


Cette 


longueur de 


avons exposé le contenu ci-dessus. 
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20 


ligne correspond bien aux adresses dont nous 


Les deux octets suivants indiquent le numéro de ligne 1. 
Ensuite Vient Un token dont la signification vous sera expliquée 
dans la section suivante; puis Viennent les codes ASCII pour le 


texte "DATA BECKER". 


Toutes les lignes de BASIC suivent ce format avec Une exception 
notable cependant en ce qui concerne les lignes BASIC comportant 
une définition de variable. Nous reviendrons plus loin sur cette 


particularité. 
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5.2 LES TOKENS 


Le terme TOKEN signifie signe. Il désigne la valeur qui est 
affectée à chaque instruction BASIC de ème qu'un code binaire est 
affecté à chaque instruction du langage-machine. L'intérêt 
essentiel du token est un gain de place en mémoire BASIC. Si vous 
utilisez par exemple l'instruction PRINT dans un programme, 
l'interpréteur BASIC remplacera les 5 lettres -5 octets- qui la 
composent, chaque fois qu’il les rencontrera {sauf si elles font 
partie d’un texte entre guillemets] par Lun code d’un octet appelé 
token. C'est d’ailleurs pourquoi il ne faut jamais utiliser les 
noms des instructions BASIC pour définir des variables. 
L'interpréteur les remplacera en effet toujours par le token de 


l'instruction correspondante. 


Voici maintenant une liste de tous les tokens n'’utilisant qu’un 
octet. Cette liste n'est donc pas tout à fait complète puisqu'il 


manque les tokens de deux octets. 


Une dernière remarque cependant: la connaissance des tokens vous 
permet de faire modifier un programme BASIC par lui-même. Vous 
pouvez ainsi User d’Un petit truc pour interdire par exemple que 
des utilisateurs mal intentionnés de Vos programmes ne suppriment 
la ligne de COPYRIGHT qui vous permet de revendiquer la propriété 


de votre travail. 
Une ligne de copyright se présente ainsi: 


1 REM "COPYRIGHT 1985 BY DATA BECKER 
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Si vous placez maintenant dans le seconde ligne de votre programme 
une instruction essentielle sans laquelle le programme ne peut pas 
fonctionner {par exemple Une instruction DIM}, vous pouvez ensuite 
insérer au milieu de Votre programme Une ligne POKE 372,191 qui 
remplacera le token du REM de la première ligne par le token de 
l'instruction PRINT. Si la ligne de copyright m'a pas été 
supprimée, tout se passera bien. Par contre si cette ligne manque, 
c'est la seconde ligne avec l'instruction essentielle au bon 


fonctionnement du programme qui se trouvera détruite. 


After 128 Mid 172 Tron 211 
Auto 129 Mode 173 wait 212 
Border 130 Move 174 Wend 213 
call 131 Mover 175 While 214 
Cat 132 Next 176 width 215 
Chain 133 New 177 window 216 
Chain Merge 133&171 On 178 Write 217 
Clear 134 On Break 179 Zone 218 
Clg 135 On Error goto 180 Di 219 
Close in 136 On sq 181 E1 220 
Close out 137 Open in 182 Erl 227 
C1s 138 Open out 183 Fn 228 
Cont 139 Origin 184 Spc 229 
Data 140 Out 185 Step 230 
Def fn 141 Paper 186 Swap 231 
Def int 142 Pen 187 Tab 234 
Def read 143 Plot 188 Then 235 
Def Str$ 144 Plotr 189 To 236 
Deg 145 Poke 190 Using 237 
Delete 146 Print 191 > 238 
Dim 147 Chr$(39) 192 = 239 
Draw 148 Rad 193 >= 240 
Drawr 149 Randomize 194 < 241 
Edit 150 Read 195 <> 242 
Else 151 Release 196 <= 243 
End 152 Rem 197 + 244 
Ent 153 Renum 198 _ 245 
Env 154 Restore 199 #* 246 
Érase 155 Resume 200 / 247 
Error 156 Return 201 4 248 
Every 157 Run 202 \ 249 
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For 
Gosub 
Goto 

1f 

Ink 
Input 
Key 

Key Def 
Let 
Line Input 
List 
Load 
Locate 
Memory 


Merge 


158 
159 
160 
161 
162 
163 
164 
164&141 
165 
1668163 
167 
168 
169 
170 
171 


Save 
Sound 
Speed 
Stop 
Symbol 
Tag 

Tag off 
Troff 


203 
204 
205 
206 
207 
208 
209 
210 


And 
Mod 
Or 

Xor 
Not 
Abs 


250 
251 
252 
253 
254 
255 


Les valeurs 221 à 226 et 232 et 233 ne sont pas utilisées mais 
produisent un effet intéressant. Si vous créez en effet Lne ligne 
1 REM et si Vous notez bien le numéro de la seconde ligne, vous 
pouvez encore Une fois protéger Votre programme contre une 
utlisation que Vous n'avez pas autorisée. 11 vous suffit pour celà 
d'entrer POKE 372,226. Alors les personnes non averties qui 
lanceraient votre programme verraient défiler de manière 
ininterrompue le message syntax error in 1. Le seul moyen de 
retrouver le contrôle de l'ordinateur dans un pareil cas consiste 
à appuyer simultanément sur les touches CTRL, SHIFT et ESC ce qui 
provoque un RESET total et détruit donc également le programme en 
mémoire. 

Si vous utilisez cette méthode de protection, il faut que vous 
fassiez attention à ne pas lancer votre programme par Un RUN mais 
par un RUN numéro de la deuxième ligne. 11 ne faut pas non plus 
qu'il y ait dans votre programme des instructions de saut à la 
première ligne. 

Cette protection est d'autant plus efficace qu’elle empêche 
également le listage de la ligne où elle figure. 


Si vous voulez la supprimer, entrez POKE 372,197. 
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5.3 FORMAT DES VARIABLES 


Nous avons choisi 5 cas représentatifs de Variables pour vous 
expliquer le format de ces lignes BASIC d'exception que sont les 
lignes avec variables. Ici encore vous aurez besoin du moniteur 
pour suivre nos développements. 

Chargez le moniteur puis entrez comme premier exemple la ligne 1 


C=100. 


Lancez le programme puis examinez la zone de la mémoire comprise 


entre 170 et 17B. Vous obtenez [en décimal]: 


ADRESSE VALEUR COMMENTAIRE 
368 12 octet faible de la longueur de ligne 
369 0 octet fort de la longueur de ligne 
370 1 octet faible du numéro de ligne 
371 0 octet fort du muméro de ligne 
37e 13 indique une variable numérique 
373 5 longueur du nom de la variable +4 
374 0 0 de séparation 
375 227 valeur ASCII du nom de la variable +128 
376 e39 token de "=" 
377 es grandeur de la variable 
378 100 valeur de la variable 
379 0 0 de séparation 


La signification des # premières Valeurs est la même qu'au 


chapitre 5.1. 
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La valeur 13 en 372 n'est pas Un token mais Un code indiquant que 
la Variable à suivre est une Variable numérique. Pour une variable 


alphanumérique, nous aurions le code 3. 


La valeur en 373 indique la longueur du nom de la variable + 4. Le 
0 qui suit n'a aucune signification autre que de séparation ainsi 


que le 0 en 379. 


Le nom de la variable apparaît ensuite, codé ainsi: tous les 
caractères du nom sont représentés par le code ASCII correspondant 
sauf le dernier caractère qui est représenté par son code ASCII + 


128. 


La valeur 239 en 376 est le token du signe égale. Ce n'est donc 


pas le code ASCII de "=" pour que l'ordinateur sache bien que le 
signe "=" me fait pas partie du nom de la variable. La valeur 
suivante (251 indique la grandeur de la variable. Ici elle 


signifie que la Valeur de la variable peut être codée sur Un seul 
octet et qu'il s'agit d’un nombre entier. Vous trouverez plus loin 


un tableau des différents codes pour la grandeur des variables. 


Le 100 en 378 correspond enfin à la valeur de la variable. 


Deuxième exemple, entrez 1 C=1000. Lancez à nouveau le programme 
et faites afficher la zone entre 174 et 17C. Voici les valeurs 


décimales correspondantes: 
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ADRESSE VALEUR COMMENTAIRE 


372 13 indique une variable numérique 

373 5 longueur du mom de la variable +4 

374 0 0 de séparation 

375 227 valeur ASCII du nom de la variable +128 
376 239 token de "=" 

377 26 grandeur de la variable 

378 e32 octet faible de la Valeur de la variable 
379 3 octet fort de la valeur de la variable 
380 0 0 de séparation 


Rien ne change jusqu'en 376 mais la grandeur de la variable est 
maintenant représentée par le code 26 qui indique que la valeur de 
cette Variable est supérieure à 255 mais inférieure à 65536 et 
qu'elle est donc représentée par deux octets et que d'autre part 


il s'agit d’un nombre entier. 


Voyons maintenant comment votre CPC code les variables numériques 


dont la valeur soit m'est pas Un nombre entier, soit est 


supérieure à 65535. Entrez donc: 1 C=100000 


Listez la zone entre 174 et 17F. Le résultat en décimal est: 


ADRESSE VALEUR COMMENTAIRE 
372 13 indique une variable numérique 
373 5 longueur du nom de la variable +4 
374 0 0 de séparation 
375 227 valeur ASCII du nom de la variable +128 
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376 e39 token de "=" 


377. 31 grandeur de la variable 
378 0 VAR 1 

379 0 VAR 2 

380 80 VAR 3 

381 67 VAR # 

382 145 VAR 5 

383 0 0 de séparation 


Le code 31 en 377 indique que la variable n’est pas Un nombre 
entier ou qu'elle est supérieure à 65535. les 5 valeurs suivantes 
indiquent la valeur de la variable, selon la formule suivante qui 
est extrêmement complexe et que vous n'êtes donc pas obligé de 


comprendre à tout prix: 


Valeur = { 2 f (VAR 5 - 145)) # (65536 + (VAR 2/1281 + 
UVAR 3 #% 2) + (VAR 4 *% 5121 + (VAR 1 / 32800)) 
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CHAPITRE 6 ROUTINES UTILES 


6-1 LE MANCHE À BALAI UTILISE COMME SOURIS 


La souris est Un de ces nouveaux concepts apparus pour rendre les 
programmes informatiques plus agréables et plus faciles à 
utiliser. La souris est Un petit boitier avec une roulette et une 
touche que vous pouvez déplacer Sur Un document pendant qu'un 
symbole, le plus souvent une flèche, suit à l'écran le mouvement 
de votre souris. Vous pouvez avec ce symbole sélectionner 
différents champs de l'écran auxquels ont été affectées 
différentes fonctions que Vous pouvez ensuite faire exécuter en 
appuyant sur le bouton de la souris. La souris remplace donc le 
clavier de l'ordinateur. Après un peu d'exercice Vous pouvez même 
manipuler la souris beaucoup plus rapidement que le clavier, à 
moins cependant que vous ne tapiez à la machine avec vos 10 


doigts. 


11 n'existe pas encore de souris pour le CPC 464, mais comme nous 
l'avons déjà fait dans notre programme de dessin, nous allons nous 


servir du joystick [manche à balai) en guise de souris. 


Pour que vous compreniez bien le fonctionnement de la souris, nous 
avons écrit quelques points du menu d’un programme de traitement 
de texte que vous allez pouvoir sélectionner en amenant avec votre 
Joystick (Amstrad ou compatible Ataril le petit point qui nous 
sert de curseur dans le rond correspondant au point du menu que 


vous choisissez. 
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Faites attention en recopiant le programme à bien taper le bon 


nombre d'espaces en lignes 30,50,70,90,110,130,150 et 170! 


55 
DR. 
mix 
fi 


CLS 
LOCATE 1,1 
FRINT'Oreer le texte 0" 
LOCATE 48,1 


=) Mn LA Be Lo MO me CN 
RAR UE EE 














SA PRIHT'Examiner texte qi" 

55 LOCATE 1.5 

Fa FRINT'Mocdifier texte Q" 

Sa LOCATE 4 

ag PFRIHT'SuFPr ie qi" 

184 LOCATE 1.17 

114 FRINT'Sauver texte Q" 
124 LOCATE 49,17 

136 PRINT '"'Charaer texte Op" 
14% LOCATE 1.25 

1SG PFRINT"'Imprimer texte 0" 
164 LOCATE 4W.25 










FRIHT"Fin de Programme 0" 
am Jr 

FLOT #5, 4064-4416, 6 

azi THEH 4=y-1 

441 THEH 4525 
az THEH s=4+1 











Es THEH GOTO 2344 ELSE GOTO 189 
AHC uz=1 THEH GOTO 408 

5 AND u=1 THEH GOT 44 

* AND =: 

+ AMC: 





THEN GOTO 528 
AND u=17 THEM GOTO 58 
+ AND u=17 THEM GOTO 66 
AND 4=25 THEN GÜTO 64 
AND y=25 THEN GOÛTO 68 


9% 


ana CLS 

414 FRINT"'Creer le texte" 

424 INPUT a$:IF ag$g<>'u" GOTO 429 
43a GOÜTO 16 

d44n CLS 

4SA FRINT'"'Examiner le texte" 
468 IHPFUT a$:1F a$<>"u" GOTO 46 
470 GOTO 18 

48a CLS 

494 FRINT'Modifier le texte" 
SAG INPUT a$:IF 3$<5"uy" GOTO 599 
519 GOTD 14 


D 
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Commentaire du programme: 


10-170 
180 

190 
200-270 


300-370 


380 


400- 


Affichage du menu 

La valeur du port joystick est placée dans une variable 

Suppression du petit curseur 

Routine de déplacement du petit curseur en fonction du 
mouvement du joystick. Le déplacement 5e fait en 
modifiant les valeurs des deux variables de coordonnées 
du joystick. Chaque fois, on doit contrôler si la valeur 
obtenue ne sort pas du cadre de l'écran pour éviter une 
erreur IMPROPER ARGUMENT. 

Fixation du petit curseur 

Si vous appuyez sur le bouton FIRE, le programme saute à 
la sous-routine correspondante, sinon le port joystick 
est a nouveau interrogé. 

Le programme saute ici lorsque Vous appuyez A#ur le 
bouton FIRE. On examine alors où se trouvait le curseur 
lorsque Vous avez appuyé sur le bouton FIRE. 

Retour «a l'interrogation du port 5i Vous avez appuyé sur 
le bouton FIRE alors que le curseur ne se trouvait pas 
dans un "O". 

Vous pouvez insérer ici les routines de Votre programme. 
Nous n'avons écrit que quelques exemples. Faites 
attention à adapter es numéros de lignes lors de 


l'appel des routines. 


Apres avoir lancé ce programme, Vous pouvez sélectionner Un des 


points du 


ecrit 


menu qui vous sont proposés {à condition que vous ayez 


toutes les routines sur le modèle que NOUS vous 
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fournissons). 11 y a maintenant deux améliorations importantes 
auxquelles Vous pouvez Vous attaquer: premièrement agrandir le 
curseur. Il vous faut pour celà travailler avec l'instruction 
LOCATE au lieu de travailler avec l'instruction PLOT. Vous 
pourriez ensuite essayer d'agrandir les ronds de sélection, de 
façon à ce qu’ils soient plus facile à atteindre. 11 faut pour 
celà interroger en 300-370 une zone plus importante que celle que 
nous interrogeons. Le mieux est d'utiliser pour celà des 


instructions d'opération logique. 
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6.2 COMMANDE DU MOTEUR DU LECTEUR DE CASSETTE 


Les deux routines dont Voici les adresses Vous permettent de 


commander le moteur du lecteur de cassette: 


&BC6éE Démarrage du moteur 


&BC71 Arrêt du moteur 


Pour faire démarrer le moteur il suffit donc d'entrer CALL &BC6E. 


Vous ne pouvez toutefois Utiliser ces routines que si la touche 


PLAY est enfoncée. 
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6.3 PROTECTION ELEMENTAIRE CONTRE LES COPIES 


Si vous tenez à protéger Vos programmes contre la copie, vous 
serez certainement très heureux d'apprendre que le CPC #64 possède 


un dispositif de protection des programmes intégré! 


11 suffit en effet pour protéger Un programme d'ajouter au nom du 
programme, lors de la sauvegarde, une virgule suivie d’un P. Un 
programme que vous aurez ainsi sauvegardé me peut être chargé 
qu'avec l'instruction RUN. 11 est alors chargé puis lance 
automatiquement. 11 n'est pas possible d'en lister le contenu ni 
de le sauvegarder à nouveau. En effet, si vous interrompez le 
programme, ce qui est possible, celui-ci se détruit 


automatiquement. 
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6.4 SAUVEGARDE D'UNE ZONE DE LA MEMOIRE 


Nous uttirons ici a mouveau votre attention sur deux possibilités 
tres interessantes dont nous avons déjà fait usage. La première 
consiste a sauvegarder certaines zones de la mémoire comme nous 


l'avons fait dans notre programme de moniteur. 


La seconde également trés importante est la faculté de sauvegarder 
tout ou partie de l'écran ainsi que nous l'avons utilisée dans 
notre editeur graphique. Ceci Vous permet notamment de faire 
apparaitre um dessin à l'écran beaucoup plus vite qu'avec les 
instructions BASIC de dessin du CPC 464. Pour plus de détails, 
nous VOUS invitons a Vous reporter aux chapitres où ces problèmes 


ont deja éte évoqués. 
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6.5 REAFFECTATION DES TOUCHES 


Deux instructions KEY et KEY DEF permettent de modifier 
l'affectation des touches de votre CPC 46%. Voici donc un 


programme qui vous permet de réaffecter les touches du clavier. Ce 


programme s'explique par lui-même. 






. de 14 Louches de chiffres 
ai Epees F 


mn 





atice suivante 





HTCPRIHT "Les chiffres recoivent l'affec 
INT: FRIHT:FRINMT 















ia BE nou 

28 F LIST" 
3 FLIH" 
4 LOC" 
sé 5 MODE" 
6 4 SAVE" 
ra a EDIT" 
gë 


touchés une seduence de 15 Ca 





outre affecter à © autr 


THPDE" Four ce faire: 
ES THEH GATE 






entrez un ‘d'";d$ 





Froëramme réedefinit en outre le clavier d'afres le format francais 


24ÿ ee FRIHT:FRIHT:FEIHT 
254 FEINT'"Frarhez une touche" 
264 CALL 46615 

er GOT 354 
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ä CLS 
INPUT'AF Fe 
IHEUTUHEE 
IHAUITUAE Tec 
IHPUT MAT Fe 



















aMliat "4CHRSE 
ar + Cri ge | 
."Load'"4+CHRSE 
sMmcude 

ee" +CHRGE 135 
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6.6 ADRESSES D'APPEL DE ROUTINES INTERESSANTES 


Nous allons vous présenter dans les pages suivantes des adresses 
de routines du système d'exploitation que vous pouvez parfaitement 
intégrer dans votre programme, même sSi vous n'êtes pas un 
professionnel de la programmation en langage-machine; il suffit 
que vous ayez 1u l'introduction au langage-machine que constitue 
le chapitre #. Nous indiquons pour chaque routine sa fonction 
ainsi que les registres d'entrée-sortie correspondants ainsi, s’il 
y a lieu, que certaines particularités de chaque routine. Voici 
auparavant, à nouveau, le programme BASIC de chargement qui vous 


permet d'appeler toutes les routines: 


10 REM CHARGEUR BASIC 
20 MEMORY &2FFF :d=0 

30 INPUT"'VALEUR "3w 

40 IF w=0 THEN GOTO 80 
50 POKE &3000+d,w 

60 d=d+1 

70 GOTO 30 

80 CALL &3000 


Le programme de chargement en mémoire des routines d'appel de 
routines système est légèrement modifié par rapport à celui que 
nous vous donnions au chapitre #.3. De cette façon Vous pouvez 
charger n'importe quelle routine sans devoir spécifier chaque fois 
la longueur de la routine à charger. Le programme ne s’interrompt 
en effet que lorsque vous entrez un 0. Si Vous devez placer un 0 


en mémoire, modifiez le test en ligne 40. 
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Si vous voulez intégrer des routines système dans le 


fonctionnement de Vos programmes, placez les routines d'appel sous 


forme de lîgnes de DATA que vous pouvez faire lire et poker en 


mémoire grâce à des variables BASIC. 
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6.6.1 COLORIER UNE ZONE 


Adresse : BC44 {hex} 


48196 (déc) 


Cette routine permet de colorier des zones de l’écran. La grandeur 
de la zone dépend du mode écran choisi et des points-limites que 


vous pouvez choisir librement. 


Registres de transmission: a code couleur [Voyez également le 
chapitre 2.10 sur la mémoire écran 
h colonne Jimite gauche de la zone à 
colorier 
d colonne limite droite de la zone à 
colorier 
1 ligne limite supérieure de la zone à 
colorier 
e ligne limite inférieure de la zone à 


colorier 


Faites très attention à ne pas fournir comme valeurs limites des 
valeurs situées en dehors de l'écran car celà pourrait bien 
“planter" Votre CPC 464. L’angle supérieur gauche de l’écran a la 


valeur 0,0. 


Registres de réponse: - = - 


Valeurs hexadécimales pour le chargeur BASIC: 3E, code couleur, 


21, limite supérieure, limite gauche, 11, limite inférieure, 


limite droite, CD, 44, BC, C9, 0 


-155- 


Toutes les valeurs dont nous me donnons que le nom {code couleur, 


limites, etc...) peuvent être définies arbitrairement. 


Format assembleur: 1d a,N 
Id h1,NN 
ld de ,NN 
call 44,BC 


ret 
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6.6.2 MODIFIER LA BANQUE ECRAN 


Adresse : BC06 Lhex) 


48134 {déc} 


Cette routine permet de placer la mémoire écran dans l'une 
quelconque des #4 banques disponibles 10-31. Les seules 
possibilités intéressantes sont cependant la banque 1 ou la banque 
standard 3 car la sélection d’une autre banque peut conduire à des 


conflits avec le système d'exploitation. 


Registres de transmission: a il faut placer dans l’accumulateur 
l'octet significatif loctet fort} de 
l'adresse où commence la nouvelle 


banque écran. 


Faites très attention à ne pas fournir d’autres valeurs conme 
paramètre que 00, 40, 80 ou CO car vous risqueriez d'aboutir à des 


résultats désagréables. 


Registres de réponse: RER 


Valeurs hexadécimales pour le chargeur BASIC: 3E ,nouvelle adresse 
de la banque ,CD,06,BC,C9,0 
Respectez bien les indications que nous vous donnons à propos des 


registres de transmission lors du choix des paramètres. 


Format assembleur: id a,N 
call 06,BC 


ret 
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6.6.3 ATTENDRE LA FRAPPE D’'UNE TOUCHE 


Adresse : BB06 lhex} 


28878 {dec | 


Cette routine interrompt le déroulement du programme juqu’'à ce 


qu'une touche quelconque soit frappée. 


Registres de transmission: - - - 


Registres de reponse: a l'accumulateur contient le code de 


la touche enfoncée. 


Valeurs hexadecimales pour le chargeur BASIC: - - - 


Cette fonction peut être appelée en n'importe quel endroit de 


votre programme Simplement par l'instruction CALL &BBDé. 


Format assembleur: call 06,BB 
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6.6.4  SCROLLING 


Adresse : BC4D {hex) 


48205 (déc) 


Cette routine Vous permet de déplacer la totalité de l'écran d’une 
ligne Vers le haut ou le bas. La Valeur de la couleur de la 
nouvelle ligne (PAPER) peut être choisie librement, dans le cadre 


des possibilités du mode écran choisi. 


Registres de transmission: b le registre b indique la direction 
du décalage. Un 0 indique un 
scrolling descendant, toute autre 
valeur Un scrolling ascendant. 

a l'accumulateur indique le code 
couleur pour Ja nouvelle ligne 


créée. 


Registres de réponse: _— 


Valeurs hexadécimales pour le chargeur BASIC: 
scrolling descendant: 6,0,3E,code couleur,CD,4D,BC,C9,0 


scrolling ascendant: 6,1,3E,code couleur,CD,4D,BC,C9,0 


Format assembleur: 1d b,N 
1d a,N 
call 4D,B8C 


ret 
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6.6.5 SCROLLING DE ZONES DE L'ECRAN 


Adresse : BCS0O [hex) 


#8208 {déc} 


Cette routine Vous permet de décaler des zones partielles de 


l'écran (fenêtres). 


Registres de transmission: b le registre b indique la direction 
du décalage. Un 0 indique uñ 
scrolling descendant, toute autre 
valeur un scrolling ascendant. 

a l'accumulateur indique le code 
couleur pour la nouvelle ligne 
créée. 

h colonne limite gauche de la fenêtre 


d colonne limite droite de la fenètre 


1 ligne limite supérieure de la 
fenêtre 

e ligne limite inférieure de la 
fenêtre 


Faites très attention à ne pas fournir comme valeurs limites des 
valeurs situées en dehors de l'écran car celà pourrait bien 
“planter" votre CPC 464. L'angle supérieur gauche de l’écran a la 


valeur 0,0. 


Registres de réponse: _— — 
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Valeurs hexadécimales pour le chargeur BASIC: 

6, direction, SE, code couleur, 21, limite supérieure, limite 
gauche, 11, limite inférieure, limite droite, CD, 50, BC, C9, 0 
Les limites ainsi définies de la zone à "scroller" ne sont en 
aucun cas dépendantes des fenêtres que vous aviez définies 


auparavant. 


Format assembleur: ld b,N 
ld a,N 
1d h1l,NN 
id de ,NN 
call 50,BC 


ret 
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6.6.6 SELECTION DU MODE ECRAN 


Adresse : BCOE (hex] 


#8142 déc} 


Cette routine Vous permet de changer de mode écran en langage- 


machine. 


Registres de transmission: a l’accumulateur contient la valeur du 


nouveau mode sélectionné. 


La Valeur de l'’accumulateur doit bien sûr être entre 0 et 2. 


Registres de réponse: - - - 


Valeurs hexadécimales pour le chargeur BASIC: SE ,nouveau 


mode ,CD,E,BC,C9,0 


Format assembleur: ld a,N 


call 0E,BC 


ret 
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6.6.7 INVERSION VIDEO D’UN CARACTERE 


Adresse : BC4A ([hex) 
48202 (déc) 


Cette routine Vous permet d’inverser Un caractère défini par ses 
coordonnées (0,0 = angle supérieur gauche de l'écran). L’inversion 


se produit sur deux cartes bits grâce à un double EXCLUSIVE OR. 


Registres de transmission: b carte bits d’inversion 1 {couleur 1) 
c carte bits d’inversion 2 [couleur 21) 
h colonne 


1 ligne 
Les paramètres dépendent bien sr du mode choisi. 
Registres de réponse: = - 


Valeurs hexadécimales pour le chargeur BASIC: 6,carte bits 


1,E,carte bits 2,21,colonne,ligne,CD,#A,BC,C9,0 


Exemple: mode 1, couleur du caractère jaune, couleur du fond bleu. 
Le caractère à inverser se trouvant dans les coordonnées fournies 
est un 0. Examinons 1’inversion des deux lignes subtiles de la 
carte bits de ce caractère. Comme carte bits d’inversion 1, nous 


choisissons "1000 0000" et comme carte bits d’inversion 2, "0000 


1111". 
Situation de départ 0111 0000 1100 0000 
Après l’inversion À 1111 0000 0100 0000 
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Après l’inversion 2 1111 1114 0100 1111 
Couleur du pixel RRRR RRRR BERR BBBB 


R=rouge B=bleu 


Format assembleur: 1d b,N 
id c,N 
ld h1,NN 
call #A,BC 


ret 
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6.6.8 SCROLLING HORIZONTAL DE L'ECRAN 


Adresse : BC0OS {hex} 
48233 (déc) 


Cette routine Vous permet de décaler la totalité de l'écran vers 


la gauche où Vers la droîte. La colonne qui disparaît à gauche 


réapparaît à droîte {wrap around]. 


Registres de transmission: h octet fort de la valeur de décalage 


1] octet faible de la valeur de 


décalage 


La Valeur de décalage doit absolument être Un nombre pair. 


Registres de réponse: - 


Valeurs hexadécimales pour le chargeur BASIC: 21, octet faible de 


la Valeur de décalage, octet fort de la valeur de décalage, CD, 5, 


BC, C9, 0 

Format assembleur: id h1,NN 
call 05,BC 
ret 


6.6.9 POSITIONNEMENT DU CURSEUR 


Adresse : BB7S (hex) 


47989 (déc) 


Cette routine correspond à l'instruction BASIC LOCATE. 


Registres de transmission: h nouvelle colonne du curseur 


1 nouvelle ligne du curseur 


La routine ne vérifie pas si les Valeurs fournies restent à 


l'intérieur de l'écran. 


Registres de réponse: - - - 


Valeurs hexadécimales pour le chargeur BASIC: 21,nouvelle 


ligne ,nouvelle colonne,CD,75,BB,C9,0 


Format assembleur: 1d h1,NN 
call 75,BB 
ret 
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6.6.10 POSITIONNEMENT HORIZONTAL DU CURSEUR 


Adresse : BB6F lhex) 


47983 {déc} 


Cette routine vous permet de positionner le curseur à l’intérieur 


de la ligne sur laquelle il se trouve. 


Registres de transmission: a nouvelle colonne du curseur 


La routine me vérifie pas si la valeur fournie reste à l’intérieur 


de l'écran. 


Registres de réponse: ee - 


Valeurs hexadécimales pour le chargeur BASIC: 3E nouvelle 


colonne ,CD,6F,B8B,C9,0 


Format assembleur: ld a,N 


call 6F,BB 


ret 
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6.6.11 POSITIONNEMENT VERTICAL DU CURSEUR 


Adresse : BB72 (hex] 


47986 I déc) 


Cette routine Vous permet de positionner le curseur à l’intérieur 


de la colonne sur laquelle il se trouve. 


Registres de transmission: a 


nouvelle ligne du curseur 


La routire ne vérifie pas si la valeur fournie reste à l’intérieur 


de l'écran. 


Registres de réponse: 


Valeurs hexadécimales 


ligne,CD,72,BB,C9,0 


Format assembleur: 


pour le chargeur BASIC: 


ld a,N 
call 72,BB 


ret 
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BE ,knouvelle 


6.6.12 INTERROGATION DU JOYSTICK [MANCHE A BALAI) 


Adresse : BB24 Uhex) 


47908 (déc) 


Cette routine permet de lire les valeurs des commutateurs des deux 


joysticks que vous pouvez connecter à votre ordinateur. 


Registres de transmission: - - - 


Registres de réponse: a l'accumulateur contient après 
l'interrogation le code 
correspondant à dla position du 
joystick 

h idem 


1 idem mais pour le joystick muméro 2 


Tout bit allumé correspond à Un contact. Les différents bits 


correspondent aux valeurs suivantes: 


bit 0 haut 


bit 1 bas 

bit 2 gauche 

bit 3 droite 

bit 4 fixe 2 (bouton fire standard} 
bit S fixe 1 

bit 6 inutilisé 

bit 7 äinutilisé 


Valeurs hexadécimales du chargeur BASIC: CD,24,BB,32,octet faible 
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fire 2,octet fort fire 2,7D,32,octet faible fire 1,octet fort fire 
1,C9,0 
Après avoir appelé cette routine Vous pouvez lire l’état des deux 


joysticks grâce à deux simples PEEK. 


Format assembleur: call 2#4,BB 
1d INN),a 
ld a,1 
1d {NN),a 
ret 
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6.6.13 BRANCHER ET DEBRANCHER L’ INVERSION 


Adresse : BB9C [hex) 


48028 (déc) 


Cette routine vous permet d'échanger les couleurs actuelles de 


PAPER et PEN. Un premier appel de cette routine réalise 


l’inversion, Un second appel la supprime. Vous pouvez arriver au 


même résultat en BASIC avec PRINT CHRS(24). 


Registres de transmission: - - - 


Registres de réponse: - - - 


Vous pouvez appeler cette routine simplement par 


CALL &BB9C 


Format assembleur: call 9C,BB 
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6.7 RANDOMIZE - À LA POURSUITE DU HASARD 


Votre CPC 464 dispose de deux instructions Vous permettant de 
recréer le hasard. La première est la fonction RND qui va 
chercher, chaque fois qu’elle est appelée la prochaine valeur 
d'une série de nombres aléatoires. Essayez l'exemple suivant après 
avoir déclenché un RESET général de votre ordinateur {CTRL-SHIFT- 


ESC ): 


10 REM Hasard? 
20 FOR t=1 TO 5 
30 PRINT RND 


40 NEXT t 


Si vous comparez les chiffres obtenus avec la liste ci-dessous, 


vous constaterez qu'il n’y a aucune différence: 


0.271940658 
0.528612386 
0.021330127 
0.175138616 


0.657773343 


Vous voyez que la fonction aléatoire n'est qu’une fonction pseudo- 
aléatoire: la série de chiffres à laquelle elle fait appel, pour 
être arbitraire n’en est pas moins rigoureusement invariable et la 
fonction RND Ja lit du début après chaque initialisation de 
l'ordinateur. Si donc vous n'utilisiez dans Vos jeux que cette 
seule fonction pour générer Un soi-disant hasard, Vous pourriez en 


assez peu de temps prévoir l’enchaînement des divers évènements 
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aléatoires censés agrémenter Votre jeu. A la longue celà 
deviendrait très ennuyeux. 

C'est pourquoi il existe une autre instruction: RANDOMIZE xx où xx 
est Un paramètre Vous permettant de faire commencer la lecture par 
RND du prochain nombre de la série aléatoire en un endroit calculé 


en fonction de ce paramètre. 


Vous pouvez recommencer notre petite expérience avec ces nouvelles 
données: provoquez un RESET de l'ordinateur puis modifiez le 


programme Hasard? de tout à l’heure en ÿy ajoutant la ligne: 


15 RANDOMIZE 33 


Lancez cette nouvelle version avec RUN et notez les chiffres 
auxquels vous aboutissez. Vous constatez Un premier progrès: les 
chiffres obtenus sont différents de la liste que nous donnions 
plus haut. Donc si l’on ne connaît pas le puramètre de RANDOMIZE, 
on ne peut pas savoir par avance quels seront les chiffres tirés 


“au hasard". 


Ce progrès reste cependant très mince car Vous pouvez constater 
que si Vous provoquez à nouveau un RESET et que vous lancez à 
nouveau la nouvelle version du programme Hasard? avec RANDOMIZE 33 
vous aboutirez aux mêmes chiffres que vous Venez de noter. Pour 
recréer véritablement une situation de hasard, il faut faire appel 
à des facteurs qui ne puissent être appréhendés directement par un 
ètre humain. Le plus simple est d'utiliser l'horloge de 
l'ordinateur. L’'horloge marque le temps qui s'est écoulé depuis 
l'allumage de Votre ordinateur. Ce temps est mesuré en Unités de 


3/100 secondes. 11 est donc possible d'affecter à l'instruction 
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RANDOMIZE un parametre dépendant du temps qui s'est écoulé depuis 
la mise sous tension de Votre ordinateur, temps qui constitue, 
surtout calcule de manière aussi précise, Un facteur que vous ne 
pouvez connaitre. Voici comment nous pouvons maintenant, à l’aide 
de l'horloge de l'ordinateur et de ses deux instructions pseudo- 


aléatoires, recréer le hasard: 


10 REM Hasard 

15 RANDOMIZE TIME 
80 FOR t=1 TO S 
30 PRINT RND 


#0 NEXT t 


La ligne essentielle de cette nouvelle Version de notre programme 
Hasard est la ligne 20 qui utilise la fonction RANDOMIZE avec la 
variable systeme TIME qui contient le temps de l'horloge de votre 


ordinateur. 
Les nombres fournis par la fonction RND sont toujours supérieurs à 
0 et inférieurs à 1. Pour obtenir des nombres entiers dans le 


cadre qui vous intéresse, 11 faut que vous appliquiez aux nombres 


renvoyés par la fonction RND la formule suivante: 


nombre aléatoire = INT (IRND #* [limite supérieure - limite 


inférieure + 11) +limite inférieure. 


Par exemple si Vous voulez Un nombre compris entre 2 et 12: 


Vous calculez d'abord le nombre de possibilités: 12 (limite 


supérieure) - 2 (limite inférieure) + 1 = 11. 
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11 y bien en effet 11 nombres compris entre 2 et 12 inclus. Vous 
multipliez donc 11 nombre de possibilités) par RND {nombre 
pseudo-aléatoirel et vous obtenez Un nombre entre 0 et 10 que vous 
arrondissez grâce à la fonction INT. Vous ajoutez ensuite e 
{limite inférieurel à ce nombre et Vous obtenez Un nombre 


parfaitement aléatoire compris entre 2 et 12. 
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6.8 LE CPC COMME CALCULATRICE 


Le seul but recherché par les constructeurs des premiers 
ordinateurs était de réaliser des machines qui puissent effectuer 
les calculs les plus compliqués beaucoup plus rapidement que les 
hommes. Bien que tout ordinateur garde toujours la faculté de 
remplir cette fonction, cette caractéristique est toutefois 
secondaire, en ce qui concerne les ordinateurs domestiques, par 
rapport aux autres possibilités de ces ordinateurs. Nous allons 
malgré tout, dans cette section, essayer de donner quelques idées 
à ceux qui utilisent le CPC 464 avant tout pour effectuer des 


calculs. 


Nous allons tout d’abord Vous montrer comment transformer votre 
ordinateur en une "calculatrice de poche", si ce n’est par la 
taille, du moins par la facilité d'utilisation. Nous allons 
simplement redéfinir à cet effet le clavier de façon à ce qu'aucun 
calcul ne nécessite l'emploi de la touche SHIFT (pour les 
opérateurs) et que d’une manière générale tout calcul puisse 
s'effectuer sans Utiliser aucune combinaison de deux touches 


différentes. 


Si celà ne vous gêne pas de ne pouvoir Utiliser que les chiffres 
situés au-dessus des lettres, Vous pouvez également taper les 
lignes 200 et suivantes de notre programme qui affectent au bloc 
de chiffres les fonctions (SIN(X)1;COSIX) que vous trouvez sur une 


calculatrice normale. 


L'utilisation du programme est très simple. Dès que vous 1’avez 


lancé, vous Voyez apparaître le message “MODIFICATIONS EFFECTUEES" 
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qui indique que toutes les touches comportant un opérateur 
arithmétique peuvent être Uvtilisées sans SHIFT. D'autre part la 
touche P s'est VU affecter le ? ce qui vous permet d'entrer plus 


rapidement l'instruction PRINT. 


Voici Une table de ces modifications: 


Signes mathématiques Touche Valeur de la touche 
* 29 
+ ; e8 
{ 17 
) 19 
& 26 
SIN! 0 128 
cost 1 129 
TAN! e 130 
ATNI 3 131 
ABS! # 132 
INTI 5 133 
HEXS! 6 134 
BINS!{ 7 135 
STRS!( 8 136 
? P e7 


Si vous voulez vous servir régulièrement de ce programme, nous 
vous conseillons de coller sur les touches modifiées de petites 
étiquettes fndiquant leur nouvelle fonction de façon à ce que vous 


n'ayez pas à les chercher sans cesse. 
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10 REM calculatrice de poche 

20 MODE 2 

30 KEY DEF 29,1,42 

40 KEY DEF 28,1,43 

50 KEY DEF 17,1,40 

60 KEY DEF 19,1,41 

70 KEY DEF 26,1,38 

80 KEY DEF 27,1,63 

90 GOSUB 200 

100 PRINT"MODIFICATIONS EFFECTUEES" 


110 END 


200 KEY 128,"sinl" 
210 KEY 129,"cos{(" 
220 KEY 130,"tanl" 
230 KEY 131,"atnl" 
240 KEY 132,"absl" 
250 KEY 133,"int{" 
260 KEY 134,"hexS(" 
270 KEY 135,'"bin${(" 
280 KEY 136,"str$l" 


290 RETURN 


Commentaire du listing: 


10 Titre 
20 Passage en mode 80 caractères 
30-80 KEY DEF permet de modifier l’ordre 


comportant des opérateurs mathématiques 
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des 


touches 


90 Saut à la sous-routine 200. Vous pouvez supprimer cette 
ligne 51 vous ne voulez pas de la sous-routine 200. 

100 Edition du message 

110 Fin du programme 

200-280 Redéfinition des touches du bloc des chiffres 


e90 Retour au programme principal 
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6.8.1 PRECISION DE CALCUL 


La précision de caleul d'un ordinateur est fonction du nombre de 
chiffres après la virgule qui correspondent aux chiffres du nombre 
réel. Un ordinateur qui renvoie 3.1416 pour PI n’a pas une grande 
précision de calcul. 

Votre CPC ne peut stocker correctement "que" neuf chiffres avant 
ou après la virgule, ce qui signifie que pour des nombres 


comportant plus de chiffres, l'imprécision sera supérieure à 1. 


Un exemple; entrez: PRINT SE9+1-GE9 


Vous attendiez certainement que Votre ordinateur réponde 1 mais 


vous voyez qu’il a répondu 2. 11 y a donc une imprécision de 1. 


Le plus grand nombre qui puisse être stocké correctement est: 


e132-1 = 4294967295 


Cette relative imprécision tient au mode de stockage des variables 


que nous avons décrit au chapitre 5. 


Pour augmenter la précision de calcul, vous pouvez utiliser des 
formules à la place des valeurs dont vous avez besoin. 11 faut 
cependant faire attention à me pas employer de constantes telles 
que les racines ou ft car celles-ci me font que nuire à la 


précision de calcul. 
Nous avons créé Un programme à partir d’une telle formule pour 
VOUS montrer comment Vous pouvez introduire Vos formules propres 


dans vos programmes sans Utiliser la fonction DEF FN qui ne peut 
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pas être employée dans tous les cas. Notre formule calcule EXP (X) 


de la façon suivante: 


EXPIXI=1+X/1!+X12/21+X13/31! 


Notre programme vous permet d'élever la ligne supérieure jusqu’au 
facteur 31. Ensuite on atteint le plafond 1E34. 

Cette fonction que ne possède pas votre CPC est simulée par la 
routine 100. 

Pour utiliser le programme, il suffit d'entrer la valeur X voulue 
et vous voyez s'afficher après Un court temps de calcul la valeur 


EXP(X). 


10 REM EXP{x) 

20 INPUT'"x-VALEUR" ; x 
30 FOR n=1 TO 31 

40 xi=xtn 

50 GOSUB 100 

60 ergi=x1/fa 

70 erg°-ergéterge+ergl 
80 NEXT 

90 PRINT erge+1 

95 END 

100 faz=1 

110 FOR m=1 TO n 

120 fa=faxm 

130 NEXT m 


140 RETURN 
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Commentaire du programme : 


10 titre 


20 entrée de la valeur X 

30 ouverture de la boucle qui définit le mombre de facultés 
#0 constitution des puissances de X 

50 saut a la sous-routine 100 

60 traitement des facultés 

70 addition du résultat 

80 fermeture de la boucle 

90 edition du résultat 

96 fin du programme 


100 rétablissement de la faculté 

110 ouverture de la boucle pour la faculté 
120 formule de calcul de la faculté 

130 fermeture de la boucle 


140 retour au programme principal 


Une formule telle que celle de EXPF(X) peut difficilement être 
définie avec une instruction DEF FN car les 31 parties ne peuvent 


entrer dans l'instruction DEF FN. 


Un autre exemple d'application des formules est le calcul des 
points 0. Les points 0 sont les points de rencontre entre la 
courbe d’une fonction et l'axe des X. Ce sont des points très 
importants pour l'analyse de la courbe d'une fonction qui ne 


peuvent être dégagés que très imprécisément du seul dessin. 


Voici un exemple de calcul de points 0 avec une équation carrée: 
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FEXI=Xt2+PxX+Q 


La formule de calcul des points 0 est: 


X1= -P/2+SGR(Pt2/4*xQ), X2= -P/2-SGR(IP12/4x0} 


Vous devez entrer d’abord la valeur de P, puis celle de Q et le 


programme vous donnera la valeur des points 0 (1X1,X2)]. 


10 INPUT p 

20 INPUT q 

30 xi= -p/2+SGRlp*p/#-q} 

40 xe2= -p/e-SGR(pxp/4-q}) 

50 IF xixx2(>q THEN 80 

60 PRINT x1,xe 

70 END 

80 PRINT"'Pas de points zeros" 


90 END 


Commentaire du listing: 


10 entrée de p 

e0 entrée de q 

30 calcul du premier point 0 

40 calcul du second point 0 

50 vérification des points 0 d’après le théorème de Vieta 
60 édition des points 0 

70 fin du programme 

80 affiche qu’il n’y a pas de points 0 
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St le programme est interrompu par Un message d'erreur, c'est 


qu'il n'y a pas de points 0. 
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6.8.2 VITESSE DE CALCUL 


La vitesse de calcul constitue une caractéristique importante d’un 
ordinateur. Elle permet à l'utilisateur d'évaluer correctement les 


possibilités de son ordinateur. 


On calcule généralement la vitesse de calcul grâce à un programme 
de test que l’on fait tourner sur différents ordinateurs. On peut 
ainsi effectuer des comparaisons valables et Voir ainsi quel 


ordinateur convient le mieux à une application donnee. 


Les tâches standard qu'on fait exécuter par les ordinateurs pour 
calculer leur Vitesse portent le mom générique de tests BENCHMARK. 
Nous avons utilisé Um tel test dans ce chapitre en suivant une 


méthode très répandue, “le tamis d’Eratosthène". 


La vitesse de calcul comprend également le traitement des 
interrogations, des boucles et la gestion de champs de données. 
Ces tâches sont également prises en compte par la méthode que nous 
avons choisie et que nous avons appliquée à deux ordinateurs avec 


les résultats suivants: 


Apple II Europlus avec MBASIC 5.2: 391,8 secondes 


VIC 20 avec carte 64K: 394,8 secondes 


Pour que vous puissiez vous même tester combien de temps il faut à 


votre CPC pour exécuter ce test, Voici Un listing du programme: 


10 REM Eratosthène 


20 DEFINT a-z 
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30 DIM f1110001:1=1000 :PRINT"Début" 
40 FOR j=1 TO 10 

50 co=0 

60 FOR i=1 TO 1:f114)=1:NEXT 
70 FOR i=1 TO 1 

80 IF fililc>1 THEN 160 

90 prim=i+i+3 

100 k=i+prim 

110 IF k>1 THEN 150 

120 fi1(k)=0 

130 k=k+prim 

140 GOTO 110 

150 co=co+1 

160 NEXT i 

170 NEXT ;j 

180 PRINT coy"Nombres premiers" 
190 END 


Si vous lancez ce programme et mesurez le temps que met votre 


ordinateur, vous Verrez qu’il soutient la comparaison avec les 


autres ordinateurs, y compris en ce qui concerne ia vitesse de 
calcul. 
Un dernier conseil: votre CPC possède un bon nombre de signes 


mathématiques spéciaux que vous ne pouvez faire afficher qu'avec 
une instruction PRINT CHRS$SIX). Mais en réfléchissant un peu au 
problème vous devriez pouvoir trouver Un moyen de faire jouer à 
ces signes leur rôle normal. Essayez par exemple avec la constante 


PI. 
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6.9 MOUVEMENTS DE L'ECRAN 


Plusieurs dialectes BASIC possèdent une instruction SCROLL 
permettant de faire glisser le contenu de l’écran d’une ligne vers 
le bas ou le haut. Nous avons utilisé une routine de la ROM du CPC 


pour simuler cette instruction. 


L'instruction SCROLL peut être très utile soît pour des jeux, soit 


pour faire défiler une liste. 


La méthode la plus simple pour provoquer Un mouvement de l'écran 
consiste à ajouter Un caractère dans l’angle inférieur droit, ce 
qui provoque un scrolling vertical Vers le haut. Maïs il est 
beaucoup plus compliqué d'arriver à un scrolling vertical vers le 
bas. On utilise généralement pour celà des routines en langage- 
machine assez longues. Sur le CPC cependant 11 est possible 


d'utiliser des routines de la ROM. 


La routine de mouvement de l'écran se trouve en &BC4D (Voyez le 
chapitre 6.61. Elle déplace l'écran de 8 pixels lun caractère}. La 
direction dépend de la valeur du registre b. Si celle-ci est nulle 
le déplacement 5e fait vers le bas et si celle-ci est non nulle le 


déplacement se fait Vers le haut. 


11 y a deux façon d'appeler cette routine: on peut écrire une 
routine d'appel en langage-machine dans laquelle on pokera en 
BASIC la valeur à affecter au registre b, ou on peut écrire dès le 
départ deux routines différentes, l’une pour Un mouvement 


descendant, l'autre pour un mouvement ascendant. 
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Pour plus de commodité, nous avons choisi cette dernière méthode. 


Voyons donc ce que devra faire notre routine en langage-machine: 


- tout d’abord charger Une valeur donnée dans le registre b avec 
l'instruction 1d b,N qui a le code 06. Le paramètre utilisé avec 
cette instruction sera 0 pour Un mouvement descendant et 255 
pour Un mouvement ascendant. C'est d’ailleurs la seule 


différence entre les deux routines. 


- 11 faut ensuite appeler la routine de 1a ROM avec l'instruction 
CALL NN dont le code est 205. À la suite de l'instruction doit 
figurer l'adresse &BC4D divisée en octets faible et fort: 77 
{4D}) et 188 (BC). 11 faut enfin retourner au BASIC avec un ret 


dont le code est 201. 


Voici les deux routines en langage-machine: 


Pour le mouvement ascendant : 


ld b,ff 06,255 
call &BC4D 205,77,188 
ret e01 


Pour le mouvement descendant : 


1d b,0 06,0 
call &BC4D 205,77,188 
ret 201 


Le programme BASIC de chargement de ces routines les place en 
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43880 pour le mouvement ascendant et en 43886 pour le mouvement 
descendant. Ce programme une fois exécuté, Vous pouvez l’effacer 
avec l'instruction DELETE -140 pour écrire ensuite votre propre 


programme qui utilisera ces routines. 


10 REM ascendant 

20 MEMORY 43879 

30 DATA 06,255,205,77,188,201 
40 FOR adr=4#3880 TO 43885 
50 READ valeur 

60 POKE adr,valeur 

70 NEXT 

80 REM descendant 

90 DATA 06,0,205,77,188,201 
100 FOR adr=#3886 TO 43891 
110 READ valeur 

120 POKE adr,valeur 

130 NEXT adr 

140 END 


Commentaire du listing: 


10 titre 

e0 réduire la mémoire BASIC 

30 DATASs pour la routine ascendante 

#0 ouverture d’une boucle d'écriture de la routine en 


langage-machine 


50 lecture des valeurs 
60 écriture des valeurs dans les adresses correspondantes 
70 fermeture de la boucle 
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80 titre 
90 DATAS pour la routine descendante 
100 ouverture d’une boucle d'écriture de la routine en 


langage-machine 


110 lecture des valeurs 

120 écriture des Valeurs dans les adresses correspondantes 
130 fermeture de la boucle 

140 fin du programme 

Ces routines une fois chargées, vous pourrez les appeler 


simplement avec call 43880 pour le mouvement ascendant et 43886 


pour le mouvement descendant. 


Voici maintenant une démonstration des possibilités de serolling 
que vous offrent ces deux routines: mous allons placer une 
inscription sur l'écran pour la faire ensuite monter puis 


descendre de 5 lignes grâce à nos deux routines. 


Vous pouvez contrôler la vitesse du mouvement en appuyant sur une 
touche. Si vous appuyez sur une touche, l'inscription se déplace. 


Sinon, le programme attend que Vous appuyiez sur Une touche. 


10 REM scroll demo 

20 MODE 1 

30 LOCATE 15,12: PRINT "SCROLLDEMO" 
35 REM ascendant 

0 FOR n=1 TO 5 

50 IF INKEY$="* THEN 50 

60 CALL 43880 


70 NEXT n 
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75 REM descendant 

80 FOR nz1 70 5 

90 1F INKEYS$="" THEN 90 
100 CALL 43886 

110 NEXT n 


120 END 


Commentaire du listing: 


10 titre 

e0 fixation du mode écran 

30 édition de l'inscription 

35 titre 

40 ouverture de la boucle pour compter les mouvements 
50 interrogation du clavier 

60 appel de la routine scroll (ascendante) 

70 fermeture de la boucle 

75 titre 

80 ouverture de la boucle pour compter les mouvements 
90 interrogation du clavier 

100 appel de la routine scroll {descendante} 

110 fermeture de la boucle 

120 fin du programme 


N'oubliez pas que ce programme de démonstration ne peut 
fonctionner 51 vous n'avez pas fait tourner au préalable le 


programme de création des routines de scrolling. 


Pour faciliter l'appel de ces routines Vous pouvez définir deux 


variables correspondant aux deux adresses: 
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HAUT =43880 BAS:43886 


11 est intéressant de ne pas perdre de Vue que l’accumulateur 
contient, pour ces deux routines, le code couleur de la ligne 
ajoutée en bas ou en haut de l'écran du fait du scrolling. Ceci 
vous permet de créer encore d’autres fonctions grâce à la routine 


scroll. 


Nous avons ainsi écrit Un petit programme qui grâce à la routine 
scroll vous permet de modifier la direction, la longueur du 


mouvement ainsi que la couleur de la ligne nouvelle. 


Pour obtenir ces fonctions supplémentaires, 11 faut ajouter 
quelques instructions à notre routine en langage-machine. Le 
registre b sera toujours utilisé pour indiquer la direction du 
mouvement mais il fonctionnera en outre comme compteur du nombre 
de lignes à ajouter. Le registre a contiendra le code couleur de 


la ligne nouvelle. 


Comme le contenu des registres est détruit lors de l'appel d’une 
routine de la ROM, 11 nous faut placer le contenu de ces registres 
sur la pile où nous irons les rechercher après l’appel de la 
routine. Pour ce faire nous utiliserons les instructions PUSH 


{pousser} et POP (retirer). 


Notre routine ainsi étendue devient donc: 
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adresse instruction code explication 


43870 ld b,N 06 le nombre de lignes IN) est chargé 
43871 N dans le registre b 

#3872 ld a,M ée le code couleur (M) est chargé 
43873 M dans l'accumulateur 

43874 push bc 197 b est placé sur la pile 

43875 push af e4S a est placé sur la pile 

43876 id b,r 06 le code direction [R] est chargé 
43877 R dans le registre b 


493878 call &RC4D 205 appel de la routine de la ROM 


3879 77 octet faible de l'adresse 
43880 188 octet fort de l'adresse 
43881 pop af e41 a est retiré de la pile 
43882 pop bc 193 b est retiré de la pile 
43883 dinz,e 16 voir plus loin 

43884 245 

23885 ret 201 retour au BASIC 


L'instruction djnz,e est Une instruction complexe de branchement 
conditionnel et relatif: elle signifie "décrementer, sauter de e 


si non nul. 


Le déroulement du programme exige en effet qu'il y ait un saut à 
l'adresse 43874, de façon à ce que le nombre de lignes ne soit pas 
limité à 1. Le registre b, comme nous l’avons déjà indiqué sert 
aux opérations de comptage. Ce registre doit donc être décrémenté 
de 1 chaque fois que la routine est exécutée. C'est ce que fait 
notre nouvelle instruction. En outre, 51 le registre b n'est 


toujours pas nul après cette décrémentation, le programme saute à 
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nouveau à l'adresse 43874. 


La valeur 245 qui sert de paramètre à notre nouvelle instruction 
indique au programme qu’il doit sauter de 9 octets en arrière. À 
ces 9 octets, deux sont ajoutés du fait que le compteur de 
programme est déjà dirigé sur l'instruction suivante. C'est aînsi 
que nous obtenons le nombre 11. Pour indiquer qu’il s’agit d’un 
saut en arrière, et non en avant, cette valeur doit être 


retranchée de 256 et on arrive alors à notre Valeur de 245. 


Si le registre b vaut 0, le programme retourne au BASIC. 


10 REM scrolldemo? 

20 MEMORY 43869 

30 adr=#3869:scro11=#3870 

40 DATA 6,10,62,0,197,245,6,255,205,77 
50 DATA 188,241,193,16,245,201 

60 FOR co=1 TO 16 

70 READ valeur 

80 POKE adr+co,valeur 

90 NEXT co 

100 MODE 1 

110 INPUT'"Couleur"“;m 

120 INFUT"nombre de lignes'";n 

130 INPFUT'"'vers le haut {1) ou le bas 12)"“;r 
140 IF r=1 THEN r=256 ELSE r=0 

150 POKE 43873 ,m 

160 POKE 43871,n 

170 POKE 43877 ,r 


180 CALL scrol] 
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190 GOTO 100 


Commentaire du 11sting: 


10 
20 
30 
#0-50 
60 
70 
80 
90 
100 
110 
120 
130 
140 


160 
170 
180 
190 


titre 

limitation de la mémoire BASIC 

fixation de l'adresse de début du programme 
Datas pour la routine en langage-machine 
ouverture de la boucle de lecture des DATA 
lecture des codes langage-machine 

écriture des Valeurs dans les adresses correspondantes 
fermeture de la boucle 

fixation du mode écran 

entrée du code couleur 

entrée du nombre de lignes 

décision si mouvement ascendant ou descendant 
traitement de la dernière entrée 


écriture du code couleur 


écriture du nombre de lignes 


écriture de la direction du mouvement 
appel de la routine en langage-machine 


retour en 100 


Les entrées nécessaires dans ce programme doivent rester dans les 


limites suivantes: 


code couleur: entre 0 et 255 


nombre de lignes: entre 1 et 25 
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Si vous 


voulez intégrer la routine en langage-machine dans un 


vos programmes, Vous aurez besoiïin des adresses suivantes: 


23873 
43871 
#3877 


43870 


le code couleur doit être placé dans cette adresse 

le nombre de lignes doit être placé dans cette adresse 
la direction du mouvement doit être placée dans cette 
adresse 


adresse de départ de la routine en langage-machine 
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de 


6.10 TRI DE DONNEES 


Le tri de données, qu’il s’agisse de données numériques ou de 
textes est Une des tâches les plus classiques des programmeurs. Le 
critère de tri est naturellement la grandeur même des nombres 
lorsqu’11 s'agit de données numériques et l’ordre alphabétique 
lorsqu'il s’agit de textes. Les codes des lettres de l'alphabet 
ont été choisis de façon à rendre très simple un tri par ordre 
alphabétique. Notez d’ailleurs que vous n'avez pas à vous en 
préoccuper car l'interpréteur BASIC vous permet de comparer 
directement deux chaînes de caractères entre elles d’après l’ordre 


alphabétique. 


Pour trier des données on peut faire appel à quantité 
d'algorithmes bien connus qui se différencient les uns des autres 
d'une part par leur complexité et d'autre part par leur 
efficacité. Pour choisir le bon algorithme pour une application 
donnée il convient tout d’abord de tenir compte du nombre de 
données qu’il s’agit de trier. Si vous n'avez en effet qu'une 
dizaine ou une cinquantaine de données à trier, les procédures les 
plus simples suffiront en général aisément à la tâche. Par contre 
si la masse de données excède une centaine ou Un millier, les 
procédures les plus simples 5e révèleront le plus souvent 
impraticables car le temps de tri risque de dépasser plusieurs 
heures. Pour que Vous puissiez aprécier la signification du choix 
d'un algorithme de tri, nous allons Vous présenter deux méthodes 
de tri, l'une élémentaire et l’autre très rapide, bubble sort et 


quick sort. 


Avec bubble sort on compare deux éléments voisins qu’on échange si 
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nécessaire. Cet algorithme peut être programmé en BASIC avec deux 


boucles imbriquées: 


100 FOR i=1 TO n:f1=0 

110 FOR j=n TOi step-1 

120 IF a$lj-1))a$lj) THEN h$=af$lj):a$l j)=a$(j-1}:a$l5-1)=h$:f1=1 
130 NEXT j:1F f1=0 THEN RETURN 

140 NEXT 3 :RETURN 


Ce programme fonctionne comme Un sous-programme que vous pouvez 
appeler avec GOSUB 100. La dimension du champ [l'index maximum) 


doit être transmise à la Variable n, par exemple: 


10 n=50:DIM afin) 
20 ‘lecture des données 


30 GOSUB 100 ’tri de données 


Un te] programme de tri est parfaitement adapté à une situation où 
il n’y a que peu de données à trier où bien où les données sont 
déjà prétriées et où seul un nouvel enregistrement doit être 


inséré dans les données triées. 


Voici maintenant Un programme de tri connu sous le mom de 
quicksort qui convient au contraire au tri de masses importantes 
de données. 11 s’agit dci aussi de trier d'après Un champ 
alphanumérique dont l’index limite doit être placé dans la 


variable n. 


Ce programme génère comme démonstration le nombre que vous 


choisissez de mots aléatoires qu’il affiche, qu’il trie puis 


-198- 


affiche dans l’ordre résultant du tri. Le temps qui 


nécessaire pour effectuer le tri est affiché au même moment. 


10 
20 
30 
40 
so 
60 
70 
80 
90 


DEFINT b-z 

input “Nombre de mots “;n: DIM d$(n),o(20),u(20) 
FOR 14=1 TO n: b=5+10*RND 

FOR j=1 TO b: d$(i)=d$(i)+CHRS(RND*25+65):NEXT: NEXT 
GOSUB 80: a=TIME: GOSUB 100: a=(TIME-a)/300 

PRINT: GOSUB 80: PRINT: PRINT a "Sek.”: END 


FOR i=1 TO n: PRINT d$(i): NEXT: RETURN 


400 s=1: o(1)=1: u(1)=n 

110 1=o(s): r=u(s): s=s-1 

120 i=l: j=r: h$=d$((1+r)/2) 

130 WHILE d$(i)<h$ AND 4€r: 1=i+1: WEND 

140 WHILE d$(j)>h$ AND j>l: j=3-1: WEND 

150 IF 1(=) THEN d$=d$(i):d4$(1)=4$(j):4$(3)=d$:i=i+1:)=3-1 
160 IF it=3 THEN 130 | 
170 IF r-i(=3-1l THEN 200 


180 
190 
200 
210 
220 
230 
240 


IF 1(j THEN s=8+1: o(8)=1: u(s)=} 
1=i: GOTO 220 

IF ir THEN s=s5+1: o(s)=i: u(s)=r 
r=) 

IF rl THEN 120 

IF 80 THEN 110 

RETURN 
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a été 


Si vous faites tourner le programme avec des champs de différentes 


tailles, vous obtiendrez environ les résultats suivants: 


n sec. 
50 3.8 
100 7.9 
200 18.6 
500 110 


Le fait que le temps de tri pour 500 enregistrements soît 
proportionnellement beaucoup plus long que pour les masses de 
données plus réduites tient à Un autre phénomène, la garbage 
collection. Ce phénomène devient inévitable lorsque vous 
travaillez avec un grand nombre de chaînes de caractères. Si vous 
venez juste d'exécuter le programme avec 500 chaînes de caractères 


et que Vous essayez d'entrer: 


? FREl"") 


vous devrez attendre environ 29 secondes avant que l'ordinateur ne 
vous réponde. C'est le temps qu'il faut à l’interpréteur BASIC 
pour ranger sa mémoire de chaînes de caractères. Chaque fois que 
le contenu d’une chaîne de caractères est modifié, l’interpréteur 
écrit le nouveau contenu dans la mémoire disponible et laisse 
intact l’ancien contenu. Mais lorsque toute la mémoire disponible 
pour les chaînes de caractères est occupée entièrement, 
l'ordinateur examine toutes les chaînes et supprime celles qui 
sont périmées de façon à libérer à nouveau de la place pour les 
nouvelles chaînes à créer. Plus 311 y a de chaînes valables en 


mémoire, plus cette procédure prend de temps. S’11 y a 500 chaînes 
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on acrive justement à 29 secondes. Cette procédure de garbage 
collection doit être utilisée constamment par l’interpréteur lors 
d’une opération de tri puisque le tri a pour effet de copier en 
permanence des chaînes de caractères. Voici maintenant à titre de 


Comparaison les temps de tri avec la méthode bubble sort: 


n sec. 
50 12.1 
100 49 


200 238.e 
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6.11 TRANSMISSION DE DONNEES A D'AUTRES ORDINATEURS 


La transmission de données du CPC 464 à d’autres ordinateurs par 
l'intermédiaire des cassettes ou des disquettes n'est en général 
pas possible du fait de la différence entre les formats de 
stockage des divers ordinateurs. Par contre, la transmission 
directe de données du CPC à un autre ordinateur peut fonctionner 
si l'ordinateur récepteur possède un port parallèle pouvant 
recevoir des données comme c'est le cas par exemple de tous les 


ordinateurs COMMODORE. 


Le CPC possède également un port parallèle qui ne peut toutefois 
servir qu'à l'envoi et non à la réception de données. 11 s’agit du 
port imprimante auquel peut être connecté une imprimante 
Centronics. La procédure de transmission à travers Un tel port est 
extrèmement simple et me nécessite du côté de l'ordinateur 
récepteur qu'un programme assez élémentaire. Matériellement la 
connexion nécessite Un câble reliant le port imprimante de votre 
CPC par exemple au port Utilisateur d’un  COMMODORE. Comme 
l'imprimante est connue du CPC, il suffit d'appeler ce port à 
travers le canal 8 qui est affecté par le CPC à 1’imprimante. 
Cette méthode vous permet par exemple de transmettre les listings 
imprimés dans le présent ouvrage à Un programme de traitement de 
texte tournant sur un COMMODORE. Seule la réception des données 
nécessite une petite routine en langage-machine telle que celle 
que nous vous fournissons ici pour un COMMODORE 64. Cette routine 
reçoit les données Venant du CPC 464, les convertit en code 
COMMODORE et les écrit sur un fichier séquentiel sur cassette où 
sur disquette, ou simplement à l'écran. Une fois que vous avez 


appelé cette routine sur Un COMMODORE 64, vous pouvez transmettre 
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Un programme de Votre CPC au COMMODORE 6% simplement avec 


l'instruction: 


LIST #8 


Vous pouvez également transmettre tout autre texte ou caractère 


avec l'instruction PRINT #8: 


PRINT #8, “Des nouvelles du CPC #64" 


Le routine en langage-machine sur le COMMODORE 64 est conçue de 
façon à ce que vous puissiez mettre fin à la transmission en 


envoyant Un code CHRS10). 


11 est toutefois important de moter que le port Centronics du CPC 
ne travaille qu'avec 7 bits alors qu’un port Centronics dispose 
normalement de 8 bits. Le bit supérieur est en effet toujours 
branché sur la masse. Ceci ne peut vous poser de problèmes pour 
transmettre des textes ASCII puisque le code ASCII est un code 7 
bits. Par contre si Vous voulez réaliser un hardcopy graphique de 
l'écran sur une imprimante, vous risquez de rencontrer certaines 
difficultés car la pluspart des imprimantes graphiques emploient 8 


aiguilles. 


Voici maintenant le programme en langage-machine pour le COMMODORE 


64: 

30: DDO00 CIA = $DD00 

40: DDO0 PORTA = CIA ; port pour ’occupé' 
50: DD01 PORTB = ClA+1 3 port pour données 
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60: 
70: 
80: 
90: 


100: 


120: 
130: 
140: 
150: 


160: 


260: 
e70: 


280: 


320: 
330: 
340 : 


350 : 


DD0D 


Co00 
Co00 
C003 


: C005 


Cco08 
C00A 
C00D 
C00F 


Coie 


: CO01*# 
: C017 
: CO1A 
: Co1C 
: CO1E 
: C020 
: C022 
: CO02# 


: C026 


Cco28 
C02A 
Ccoec 


: CO2E 
: C030 


: C0o32 


C034 


C036 


C037 


C039 


AD 
e9 


A9 
ec 
F0 
AD 
09 
8D 
AD 
F0 
C9 
F0 
C9 
90 
C9 
BO 
09 
30 
C9 
90 
C9 
Bo 


48 
Ae 


20 


00 DD START 


FB 
00 DD 
10 
oD DD 
FB 
00 DD 
04 


00 


8 


01 


8 


e2A 
0A 
E0 
41 
12 
58 
04 
80 
DA 
61 
06 
78 


SF 


01 


C9 FF 


CR 


WAIT 


TEST 


END 


LDA 
AND 
STA 
LDA 
BIT 
BEQ 
LDA 
ORA 
STA 
LDA 
BEQ 
CMP 
BEQ 
CMP 
BCC 
CMP 
BCS 
ORA 
BMI 
CMP 
BCC 
CMP 
BCS 
AND 
PHA 
LDX 


JSR 


CIA+13 jregistre de contrôle 


$Co00 
PORTA 
#%11111011 ;5busy low 
PORTA 
##%100000 
CR 
WAIT attendre flag 
PORTA 
#%100 1busy hi 
PORTA 
PORTB lire données 
ENDE 181 0, fin 
#10 signorer line feed 
START 
#"A" 
END conversion en 
#"Z"+1 
TEST ASCII CBM 
#$80 
END 
#$61 
END 
#$7B 
END 
#$SF 

sranger les données 

#1 


$SFFC9 sédition sur le canal 1 
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360: C03C 68 PLA 


370: C03D 20 De FF USR $FFD2 ssoctir Un caractère 

380: C040 20 CC FF JSR $FFCC ysortie à nouveau sur 
défaut 

390: C0x3 4#C 00 CO JMP START retour au début 

400: C046 60 ENDE RTS sfin 


Sur le COMMODORE 64, vous devez ouvrir tout d’abord un canal de 


données avec le numéro logique 1: 


OPEN 1,1,1,"DONNEES" pour la cassette où 


OPEN 1,8,2,"DONNEES ,S,W" pour la disquette ou 


OPEN 1,3 


si vous voulez simplement une édition sur l'écran. Vous pouvez 
ensuite lancer le programme avec SYS 49152. Vous pouvez alors 
envoyer par exemple un listing de programme du CPC au COMMODORE 
avec l'instruction LIST #8. Vous pouvez mettre fin à dla 


transmission en entrant sur votre CPC: 


PRINT #8, CHR$(01) 


Le COMMODORE 64 affiche alors ’READY' et Vous pouvez fermer le 
fichier sur lequel ont été écrites les données avec l'instruction 
CLOSE 1. Voici enfin l'affectation des pins du câble de 


transmission entre les deux ordinateurs: 
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Port imprimante Port utilisateur 


du CPC #6% du COMMODORE 64 
Pin Signification Pin 
1 flag B 

e DO C 

3 D1 D 
CO De E 

5 D3 F 

6 D4 H 

7 D5 J 

8 Dé K 

9 D7 L 
11 BUSY M 
12 GND N 
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6.12 IMPRESSION TRANSPARENTE 


Vous avez certainement remarqué que l'impression est beaucoup plus 
lente que l'édition sur écran. Lorsque vous utilisez Un programme 
qui imprime certaines données au fur et à mesure que vous les 
entrez, l'impression risque de ralentir considérablement votre 
travail. La solution idéale est bien sûr l'impression transparente 
qui Vous permet de continuer à utiliser Votre ordinateur pendant 


que l'impression se déroule. 


Nous vous avons concocté une petite routine d'impression 
transparente très simple à utiliser: ajoutez à Votre programme les 
lignes de cette routine [65000 à 652401 et vous n'aurez ensuite 
plus qu'à affecter à la Variable pr$ les données à imprimer et à 
appeler la routine avec GOSUB 65000 pour déclencher l'impression 


transparente. 


Le buffer d'imprimante sera alors rempli avec pr$ et votre 


programme continuera sauf 51 le buffer est plein. 


C'est pourquoi vous pouvez adapter sa dimension à vos besoins 
grâce à l'instruction EVERY qui contraint l'ordinateur à examiner 
régulièrement s’/11 y a quelque chose dans le buffer. Si oui, une 


ligne est éditée, etc... 


Attention! La fin de votre programme doit absolument se présenter 


comme les lignes 220 et 240 de façon à ce que le contenu du buffer 


soit bien entièrement imprimé! 


Les lignes 100 à 200 servent de démonstration. La routine que vous 
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pourrez intégrer dans Vos programmes commence 


utilisation en grandeur réelle, changez le 7 de 


8. 


Voici le programme: 


100 
140 
160 
180 
200 
210 
220 
240 


65000 
65020 


CLS:WINDOW #7,21,40,1,25 
FOR i=0 TO 130 
pr$=HEX$(1,6) 

GOSUB 65000 


NEXT 

PRINT" ® 
ON bfl GOTO 220 
END 


REM fill buffer 
ON f1 GOTO 65060 


65040 DIM pr$(999):f1=1:pfc=1 
65050 EVERY 30,0 GOSUB 65160 
65060 IF pc=pfc THEN 65060 


65080 


DI:pr$(fc)=pr$:bf1=1 


65100 fc=fc+1:IF fc>999 THEN fc=0 
65120 pfc=fc+1:IF pfc)999 THEN pfc=0 
65140 RETURN 

65160 REM print buffer 

65180 IF pc=fc THEN bf]1=-0O:RETURN 


65200 
65220 
65240 


PRINT#7,pr$(pc) 
pc=pc+1:I1F pc>999 THEN pc=0 
RETURN 
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en 65000. Pour une 


la ligne 65200 en 


CHAPITRE 7 PROGRAMMES UTILISATEUR 


7.1 INTRODUCTION 


Comme il n’y a pas encore beaucoup de programmes pour le CPC #64 
sur le marché et que seuls les programmes font véritablement d’un 
ordinateur Une machine très utile, nous Vous présentons quelques 
applications pratiques qui pourront vous rendre de grands 
services, à commencer par Un programme de gestion de données 
puisque c’est là certainement Une des applications les plus 
courantes et les plus importantes pour tout Un chacun des 


ordinateurs. 


Le CPC 464 se prête d'ailleurs admirablement bien à la gestion de 


données, notamment grâce à ses 80 caractères pur ligne. 


Les programmes que nous Vous présentons peuvent tous tourner tels 
quels mais nous les avons abondamment commentés et nous vous 
indiquons pour chaque partie de ces programmes comment vous 
pourriez y apporter des modifications éventuelles pour les 
améliorer ou les adapter à vos besoins propres. L'analyse 
détaillée de tels programmes ainsi que leur adaptation seront pour 
vous une excellente manière d'apprendre à maîtriser pleinement le 


BASIC. 


Nous vous souhaitons beaucoup de réussite: c’est en forgeant qu’on 


devient forgeron! 
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7.2 PROGRAMME DE TRAITEMENT DE DONNEES 


Une gestion de données est Un programme Universel que vous pouvez 
adapter à différentes applications particulières, alors qu’un 
programme de gestion d'adresses ou de gestion de stock constitue 


une application spécifique. 


La gestion de données est réalisée en informatique grâce à Un 
programme de gestion de fichier qui comporte des enregistrements 
et des champs. Pour bien comprendre le lien entre la gestion de 
fichier et Un traitement de données manuel classique, il suffit de 
comparer le fichier informatique au fichier classique, les 
enregistrements étant les diverses fiches en carton dont se 
compose le fichier classique ét le champ correspondant à chaque 


rubrique d’une de ces fiches en carton. 


Le caractère universel d’Un programme de gestion de fichier se 
manifeste par le fait que Vous pouvez déterminer librement le 
nombre d'’'enregistrements et de champs. Vous pouvez affecter à 
chaque champ le nom que vous souhaitez. Si vous voulez créer un 
fichier d'adresse avec Votre programme de gestion de fichier, vous 
pouvez pur exemple définir le premier champ ’NOM/PRENOM', le 
second RUE’ et le troisième ’LOCALITE’. Vous Voyez qu’un tel 
programme peut vraiment rendre service à tout le monde du fait de 
son adaptabilité. Vous pouvez même avec Un peu d'imagination 


l'utiliser pour le traitement de texte. 


Comme ce programme est relativement long nous l’avons décomposé 


pour l'exposé en ces différents modules. Mais bien sûr vous devrez 


taper directement tout le programme sur Votre CPC 464. 
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MODULE 1 -MENU- 


Le menu Vous présente les différentes fonctions dont dispose le 
programme en associant Un numéro à chacune de ces fonctions. Pour 
sélectionner une fonction, vous tapez le numéro correspondant puis 
vous appuyez sur ENTER. Chaque fois que vous avez fini d'utiliser 
une fonction quelconque du programme Vous êtes à nouveau ramené au 
menu. Vous pouvez alors indiquer à l'ordinateur d'exécuter une 


autre tâche. 


Sestion de fichier 
18 D LA RE 


t e a m CF C 
beck 





REMY KKE 
98 MODE Z 
18@ LOCATE 24,3: FRIHT"C F C C A T A" 
l1ü LOCATE ZW, S: PRINT STRINGéé Éd, an 
128 LOCATE 18,7:FRINT'COPYRIGHT 1384 E DATA BECKER" 
138 LÜCATE 15.18:FRIHT" WE H LL" 
14@ LOCATE 15: 11:FRIMT" mm! 
154 LOCATE 15.13: PRINT"Cregr un fichier - 1 -" 
166 LOCATE 15.14:PRIHT"Entrer le fichier _ - 
174 LOCHTE 1$.:15:FRIHT"'Actuali: le fichier 
184 LOCATE 15416: FRINT"£au arder le fichier 
194 LOCATE 19,18: PRINT "Charger un fichier 
284 LOCATE 15,15: PRINT'"'Recherche 
814 LOCATE 15,:19:FRINT"ImPrimer le fichier 
ë24 LOCATE 15,24: PRINT"Fin du Frogramme 
234 LOCATE 15,21: PRINT'SupPrimer f l 
244 FFINT:FRIHT:IHFUT'"'Yotre choi 
54 ON a GOSUR ZEG. 630. 1416, 144, 
ea GÜTO 34 
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Explication du programme: 


90 
100-230 
240 


250 


260 


Variables 


Indication du copyright ainsi que du numéro de 
version du programme 

Passage en mode 80 caractères 

Edition de la page menu avec l'instruction locate 

On vous demande de choisir Une des fonctions 
programme 

Saut à la routine que vous avez choisie 


Lorsqu'un des modules du programme a été exécuté, 


la 


du 


le 


programme retourne à cette ligne par une instruction 


RETURN. Cette ligne indique à l'ordinateur de sauter au 


début du module menu. 


employées: 


Numéro du module du programme sélectionné 


Mode d'emploi de ce module: 


Entrez le 


numéro du module sélectionné et appuyez sur ENTER. 


-212- 


MOOULE 2 -CREATION DU FICHIER- 


Ce module Vous permet de définir le fichier à créer. Vous devez 
fournir deux indications: la dimension que doit avoir votre 
fichier et d'autre part quels noms devront avoir les différents 
champs de votre fichier. Une fois que vous avez entré ces 
indications, Vous avez encore la possibilité de les modifier 


immédiatement si vous pensez avoir commis une erreur. 


FEM creation du fichier 

CLS 

FRIHT STRINGSE ESA, Men 

LOCATE 15:3:PEINT'C RE RTIUN PAT FICHIER" 

FRIUT STRING RE, MU 

LOCATE 1,8: IHPUT'"'Oombien d'enregistrements doit comporter le fichier"ienresi 


FRIHT:IHPUT'"Combien de chamrs doit comporter un enregistrement" champs 


A CI nomenr$enregis 


DIM nomcha$gé champs 
DIM contenuS$t champs, enreais 
FEM definition des champs 


CLS 

PRIHT'Definition des chamrs d'un enregistrement" 
henresiesenregis 

hchamks=champ s 

FF: I HT M ao ao ae oc nr on ae pe ane em mm 0 om ne es om ne aq ab dé on is D a me ne mo 1 
FRIHT:FRINT'É Vous avez "ichambsi "champs à definir" 





A PRIHT:FRINT 


FOR chamPssl TO hchames 


54 FRINT"'Hom du chame Ho "champs: INPUT" omcha ge Champs 
FA MEXT chames 


& FOR champs=i TO Cha 


FEIHT: INPUT" Moulez-vous aPforter des modifications" :modifé 
IF LEFT#modifé.1lis"n" THEN GOTO 36 

CLS 

PRINT" Magdification 
FRIHT" 


du nom d'un Chame" 








1 
GA PRINT'"'Hom"ichames: "it", nomchagt champs 
HEXT 

PRIHT:FRINT 

IHPUT "Quel Char voulez-vous modifier" 









FRIHT "Ancien nom du chame "nonmchagi ch 
IHPUT'"'Nouveau nom du Chame "ncicha d 

INPUT 'Moulez-uous aFForter encore Une modification" modifs 
IF LEFT#imodifé.iis"n" THEN GOTO 94 ELSE GOTO 564 

FETIIRH 
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Explication du programme: 


280-320 
330-340 


350-360 


400-410 


380-440 
450-470 
480 
490 
500-520 
630-550 


560-620 


Variables 


enregis 
champs 
henregis 


hchamps 


En-tête du module 

Entrée de la taille du fichier 

Les variables réservées pour les différents noms des 
champs du fichier sont dimensionnées en fonction de la 
dimension choisie du fichier 

Les nombres de champs et d’enregistrements sont placés 
dans des variables auxiliaires {hchamps et henregis]) car 
les variables champs et enregis seront utilisées dans 
des boucles où elles pourront recevoir d’autres valeurs 
En-tête du sous-module DEFINITION DES CHAMPS 

Boucle d'entrée des noms de champs 

Demande si modifications nécessaires 

Si "non", retour au menu 

En-tète du sous-module MODIFICATION 

Boucle d'édition des moms de champs 

Routine de modification des noms avec retour au menu 


quand plus aucune modification n'est demandée 


employées: 

Nombre d’enregistrements du fichier 
Nombre de champs du fichier 

Conserve le nombre d’enregistrements 


Conserve le nombre de champs 


nomenr${enregis]} Noms des enregistrements 


nomcha$!l champs 1! Noms des champs 


modifs 


Contient la décision oui/non 
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Améliorations possibles: 

La définition du fichier sous sa forme actuelle interdit une 
extension future de ce fichier. Il y a donc là une modification 
majeure à réaliser qui remettraîit en cause beaucoup de principes 
utilisés dans notre programme. Il est donc recommandé aux 
débutants qui voudraient s'attaquer à ce problème de se faire 
aider par des programmeurs plus confirmés. Les débutants 
pourraient par contre essayer d'écrire quelques lignes de 
programme pour contrôler les entrées et rejeter les entrées 
erronnées ou bien essayer d'utiliser les fenêtres lors de la 
procédure d'entrée. On pourrait ainsi contrôler la sortie du cadre 
d'une zone donnée de l'écran et améliorer l'ergonomie du 


programme. 


Mode d'emploi de ce module: 

Le mode d'emploi est très simple puisque vous n'avez qu’à répondre 
aux demandes qui vous sont faites par l'ordinateur: vous entrez 
d’abord le nombre d’enregistrements [par exemple pour un fichier 
d'adresses, combien de personnes figureront dans votre fichier) 
puis le nombre de champs [combien de renseignements voulez-vous 
pouvoir porter par personne). Vous indiquez ensuite les noms des 


différents champs. 


Vous pouvez ensuite choisir de retourner au menu lentrez n) ou 
d'effectuer des modifications lentrez o). Le programme affiche 
alors les différents champs aînsi que leurs noms respectifs et 
vous entrez alors le numéro du champ que vous souhaitez modifier. 


Vous choisissez maintenant à nouveau, soit de procéder à Une autre 
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modification, soit de retourner au menu. 
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634 
64+a 
654 
é6à 
67a 
san 
696 


MODULE 3 -ENTRER LE FICHIER- 


Ce module vous permet de remplir le fichier que Vous avez défini. 


On vous demande d’abord de donner Un nom au fichier et Vous pouvez 


ensuite entrer toutes les données (noms, adresses, etc 


vous voulez y voir figurer. Après chaque entrée, vous 


éventuellement corriger ce que Vous Venez d'inscrire. 


CLS 

chamPs=hchampzs 

enregisshenresis 

FEINT STRIHGgE 254, "05 

LOCATE IS S:FRINT'ENTERER LE FICHIEF" 


mPs 2" 


di 
719 
ven 
739 
748 
F54 
760 
770 
784 
790 
889 
814 
820 
836 
849 
850 
86a 
87a 
880 
83û 
980 
916 
920 
930 
94û 
950 
968 
976 
98a 
990 


PRIHT STRIHGSE 45, un 

LOCATE 1.:19:FRIHT"CYotre fichier a".enreñis:"enresistrements 
PRINT:PRINT: INPUT "Quel doit etre Le mom du fichier"; nomtich$ 
CLS 

REM voir ligne 365 


FOR enregissi T0 henregis 
ChamPs=hchampes 

FOR chamPs=1i TO hchamPs 

WINCOW SURF A 

WINDOW 1.841,88 

PRINT STRIMNGSC 5, "et 

PRINT'"'Hom du fichier :";nomfiché 


PRINT'"Maxirum d'enresistrements :"henreñis. "Hombre de champs 
PRINT'Humers de l'enregistrement actuel :"ienregis 
PRINT'"'Humero du champ actuel :"ichamts 

PRINT STRING 250, "-"5 


WIHOOW 1,89,9,25 

CLS 

PRINT nomcha$i champs ji : INPUT" contenug$t champs. enregis 
WEXT champs 

NEXT enregis 

LOCATE 1,19 

PRINT: INPUT'"Voulez-"ous aFPorter des madifications"imodifs$ 


IF LEFTSCmodifé,1ia"n" THEN GOTO 96G 

CLS 

Lena du contenus d'un Chap 

PRINT "mu une ou cv ne ve meme pm mm ee tn 

PRINT: INPUT'"'Quel chamP voulez-vous modifier";ichamts 


INPUT"Dans Quel enre3istrement";enregis 

PRINT"'Ancien contenu du chamP "contenu$(chamPs:enresis 
INPUT'"'Nouveau contenu du chamF "icontenug$(chamPs.enresis) 
INPUT" Voulez-vous aPPorter encore une modification";:modifs$ 


1000 IF LEFT$Cmodifé$, 12m"n" THEM GOTA 99 ELSE GOTO 929 
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.-} que 


pouvez 


et" champs: 


i"ihchamps 


Micra 


Explication du programme: 


630-6970 
650-660 


730-750 


770-830 


840-880 


890-910 


920-1000 


En-tête du module 

Les variables enregis et champs reçoivent leurs Valeurs 
originelles 

Entrée du nom du fichier 

La variable contenu$ qui contiendra les données est 
dimensionnée 

Ouverture des boucles d'entrée des données 

En-tête du sous-module d'entrée qui vous informe sur les 
champs et enregistrements [technique des fenêtres] 
Lecture des données de votre fichier 

Demande si modifications nécessaires 


Si "non retour au menu 


Routine de modification avec retour au menu quand plus 
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aucune modification n'est demandée 


Variables employées: 

enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 

nomfich$ Nom du fichier 

contenus {champs ,enregis) Tableau à deux dimensions contenant 
les données du fichier 


modifs Contient la décision oui/non 


Améliorations possibles: 

Deux améliorations principales sont possibles qui sont à la portée 
de tous: 

Premièrement éviter que lors de l'entrée d’un enregistrement, tous 
les champs définis auparavant soient effacés. 

Deuxièmement appeler la routine de modifications après l'entrée de 
chaque enregistrement. 

Notez d'autre part l'emploi des fenêtres, Une méthode qui rend un 
programme beaucoup plus agréable à utiliser et que vous pouvez 
étendre à toutes les parties de notre programme mais bien sûr 


également à tout autre programme. 


Mode d'emploi de ce module: 


Vous entrez d'abord le nom du fichier puis vous passez dans la 


page d'entrée où vous Voyez en permanence le nombre maximum 
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d'enregistrements et de champs ainsi que les numéros des champ et 
enregistrement actuels. Dans la partie médiane de l'écran, vous 


entrez les données de votre fichier champ par champ. 


Vous pouvez ensuite procéder à des modifications comme dans le 


module précédent ou bien retourner au menu. 
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MODULE #4 -ACTUALISER LE FICHIER- 


Ce module vous permet de maintenir votre fichier “dans le coup". 
11 arrive souvent qu’on ait besoin de modifier des données d’un 
fichier, à la suite d’un changement d'adresse par exemple où bien 
parce qu’on a rencontré certaines personnes et qu’on en a perdu 
d'autres de vue. C'est ce que permet donc le module 4, module 
d'actualisation de votre fichier. 

Vous pouvez modifier les données que contient Votre fichier soit 
en AIndiquant directement le champ et l'enregistrement que vous 
voulez modifier, soit en feuilletant votre fichier jusqu’à ce que 
vous rencontriez Un enregistrement qu’il vous semble nécessaire de 


modifier. 


618 CLS 

020 PRINT STRING 459, "-") 

030 LOCATE 15.3:FRIHT" ACTUALISER LE FICHIER" 
048 PRINT STRINGSC245@, "-—" 5 

058 PRINT:'PRINT'Modification directe du contenu d'un champ — 1 —" 
869 PRINT'Feuilleter Puis modifier eee 

878 PRINT:INPUT'"Yotre choix "ia 

98@ IF ax2 GOTO 1174 

698 CLS 

108 PRINT'Modification directe du contenu d'un champ" 

119 PRINT:PRINT:PRIHT:INPLUT"Quel champ voulez-vous modifier";ichamPs 
129 INPUT"'Dans Quel enregistrement! ienreñis 

135Q PRINT:PRINT:FRINT'"'Ancien contenus du champ "contenu$e chames.entenis 
148 INPUT'Nouveau contenus du chamP “icontenu$é charmFs, enresis 

159 INPUT'Voulez-wvous 3PPorter encore une modification"inmodifs$ 

166 IF LEFT$Cmodif$,12="o" THEN GOTO 1439 ELSE FRETUFH 

178 CLS 

188 chamPs=hchamps 

198 enreñis=henresis 

298 FOR enre9is=1l TO henregis 

219 UINDOWH 1.84,1.8 

2c9 PRINT STRING ESA, "0 

238 PRINT"'Fichier actuel :"nomfiché 

244 PRINT'Enregistrement actuel :"enregis 

258 PRINT STRING#E 4.504, "0 

264 GOSUB 1239 

274 PRINT:INPUT'Voulez-wous aFForter des modifications "imodifé 
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IF LEFT$madif$,1lie"n" THEN GÜTO 1428 
GOT 1350 


34 WINOOW 1,84.9.24 





145 


a CLS 


FOR chamrsezi TD Hihamps 
FEINT nomchagc champs di": "is conteni$t champs, enreñis à 
NEXT champs 


A FETURFH 
ñ MIHDOW 1:89.:21,25 


CLS 

PRINT STFIHGHE RSA, MU 

FRINT:INPUT'"'Guel chamF voulez-vous modifier";chames 
IHFUIT'"H tent du champ "icontenu$e chants, enresis 2 







IHPUIT Mons apporter encore une modification" imodifé 
JF LEFTS rm s"o" THEH GÜTO 1368 

A HEXT enresis 
FETLFH 


Explication du programme: 


1010-1060 En-tête du module 
1070 Choix du sous-module 


1080 Saut au sous-module choisi 


1090-1140 Modification directe après indication du champ 


l'enregistrement à modifier 


1150-1160 Vous indiquez si vous voulez apporter encore 


modification ou revenir au menu 
1170-1250 En-tête de l’autre sous-module 
1200 Boucle d'affichage des enregistrements 


1260 Saut à la routine d'affichage des champs 


1290-1330 Routine qui affiche par une boucle le nom et le contenu 


de chaque champ d’un enregistrement 


1340 Retour en 1270 
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1270 Décision si modification ou saut en 1350 
1350-1400 Routine de modification 
1400-1410 Décision si Un autre champ doit être modifié. Si "non", 


enregistrement suivant 


Variables employées: 

a Numéro du sous-module à appeler 

enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 

nomfich$ Nom du fichier 

contenus {champs ,enregis) Tableau à deux dimensions contenant 
les données du fichier 


modifs Contient la décision oui/non 


Améliorations possibles: 


C'est uniquement le deuxième module qu’il serait nécessaire 
d'améliorer: vous ne pouvez en effet retourner au menu que lorsque 
vous avez feuilleté l’ensemble des enregistrements, ce qui peut 
être extrêmement pénible 851 le fichier est de taille importante. 
11 faudrait donc écrire Une petite routine qui teste en permanence 
si une touche {par exemple ’&’]) est enfoncée et dans ce cas vous 


renvoie au menu avec Une simple instruction GOTO. 
Mode d'emploi de ce module: 


Vous devez d’abord décider 51 Vous voulez faire une modification 
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directe ou feuilleter d’abord les divers enregistrements de votre 
fichier. Vous ne pouvez évidemment faire de modification directe 
que si vous connaissez les numéros du champ et de l'enregistrement 
à modifier. Dans le cas contraire, vous devez choïisir le deuxième 


sous-module. 


Si vous choisissez la modification directe, Vous entrez les 
numéros du champ et de l'enregistrement à modifier. Le programme 
affiche alors l’ancien contenu de ce champ que vous pouvez 
maintenant modifier. Vous indiquez ensuite si vous voulez procéder 


à une autre modification ou revenir au menu. 


Si vous choisissez de feuilleter le contenu du fichier, Île 
programme affiche le contenu des divers champs de chaque 
enregistrement l’Un après l’autre. Vous pouvez alors modifier un 
champ en en indiquant le numéro. Vous pouvez ensuite modifier un 


autre champ ou consulter l'enregistrement suivant. 
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1446 
1458 
1458 
1472 
1480 
1498 
1588 
1516 
1524 
1536 
1544 
1559 
1569 


MODULE S -SAUVEGARDER LE FICHIER- 


Ce module Vous permet de sauvegarder votre fichier sur cussette de 
façon à ce que vos données sojent conservées une fois que vous 


aurez éteint votre ordinateur. 


CLS 

PRINT STRIHGSE ESA, "ni 

FRIHT" SAUVEGARDGER LE FICHIER" 
PRIHT STRINHGSC ESA, Men 

LOCATE S1@:PRINT"e sauvegarde votre fichier. veuillez Fatienter." 
OFENQUT nomf ich 
FOR enregissi TO heure3is 

FOR champezl TO hchanFs 

PRINTÉES contenuéé champs, enreñis 
HEAT champs 

HEXT enreñis 

CLOSEGILIT 

RETURH 





Explication du programme: 

1440-1470 En-tête du module 

1480 Message à l'utilisateur 

1490 Ouverture d'un fichier sur cassette avec le nom du 
fichier se trouvant en mémoire 

1500-1540 Boucle d'écriture des données sur la bande 


1550 Fermeture du fichier 
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1560 Retour au menu 


Variables employées: 


enregis Nombre d'enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 

nomfich$ Nom du fichier 

contenuf$lchamps ,enregis) Tableau à deux dimensions contenant 


les données du fichier 


Améliorations possibles: 


11 n'y a pas ici d'améliorations essentielles à apporter. Vous 
pouvez toutefois améliorer la présentation et l'ergonomie de ce 


module. 


Mode d'emploi de ce module: 


Le message vous invitant à appuyer sur les touches PLAY et RECORD 
du lecteur de cassette apparaît peu après que Vous ayez 
sélectionne ce module. Vous n'avez plus ensuite qu'à appuyer sur 


une touche quelconque pour que la sauvegarde s'effectue. 
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1574 
1584 
1599 
154 
1614 
1624 
163 
1654 
1554 
1669 
LEFE 
1654 
1634 


MODULE 6 -CHARGER UN FICHIER- 


Ce module vous permet de charger les fichiers que vous avez 
sauvegardés sur cassette. Mais Vous devez auparavant fixer les 
paramètres de nombres de champs et d’enregistrements en fonction 


du fichier que vous allez charger. Utilisez pour celà le module 1. 


CLS 

PRINT STRIHGS#C ER, "0 si 
FRIHT" CHARGER U H FICHIER" 
PRINT STRING RTE, Mens 


LOCATE S,19:PFRINT'ée charge votre fichier, veuillez Patienter." 
OFEHIH " 

FÜR enreñis=i TQ henreais 

FOR chamrssi TO hchanmps 
IHPUTÉS, contenmééchamps.enresis 
HEËT cham 
HEËT enregis 
CLOSEIH 
RETURN 


Le 





Explication du programme: 


1570-1600 En-tête du module 

1610 Message à l'utilisateur 

1620 Ouverture d’un fichier sur cassette en lecture 
1630-1670 Boucle de lecture des données sur la bande 


1680 Fermeture du fichier 
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1690 Retour au menu 


Variables employées: 

enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 

contenu${ichamps ,enregisl Tableau à deux dimensions contenant 


les données du fichier 


Améliorations possibles: 

Ici aussi, Vous pouvez toutefois améliorer la présentation et 
l'ergonomie de ce module. 11 serait d'autre part très intéressant 
que le programme puisse charger un fichier sans en connaître 


d'avance les nombres de champs et d’enregistrements. 


Mode d'emploi de ce module: 

Le message vous invitant à appuyer sur la touche PLAY du lecteur 
de cassette apparaît peu après que Vous ayez sélectionné ce 
module. Enroulez la cassette jusqu’au début du fichier à charger 
puis appuyez sur la touche PLAY. Vous n'avez plus ensuite qu'à 
appuyer sur une touche quelconque pour que le chargement 


s'effectue. 
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MODULE 7 -RECHERCHER- 


Ce module vous permet de rechercher une donnée figurant dans votre 
fichier, Un nom où Un numéro de téléphone par exemple. Il vous 
suffit d'indiquer quelle est la donnée que vous Voulez retrouver 
et combien de lettres de cette donnée doivent être prises en 
compte. Plus le nombre de lettres significatives est réduit, plus 
la recherche sera rapide mais plus 11 ÿ aura de chances également 


que la donnée trouvée ne corresponde pus à ce que vous cherchez. 























ichanmps ni 


1788 CLS 

1719 PRINT STRINGS£ 450, "— 

1720 PRINT" FECHERCHER" 
1739 PRINT STRIHGSE SA, MU 

1749 LOCATE . 19: INPUT'Quel est le critere 

1754 LOCATE 5.11: INPUT"'Combien de + 

176Q FRIHT: PRINT: FRINT'"'La recher 

1778 FRINT'assezz 

1788 cherche$eLEFT$ criteres, lett 

1794 FOR enregisz1 TO herreuis 

1544 FOR chambsæl TÙ] hchamPs 

1819 aide$=contenu$e chamPls: enreai 

1924 trouvegzLEFTés aides, lettres: 

183@ IF cherchegstrouveS THEN GÜTO 1854 

1548 HEXT champs 

195Q HEXT enrexiz 

1869 IHPUT'"'Ce critere n'a Pas ete trouve, faut-il en chercher un autre"ichoixS$ À 
1570 IF LEFT#échoix$.,1s"n" THEM RETURH ELSE GOTO 1744 
1889 PRIHT"'Le critere de recherche “icritereg:i" ze dans le chame " 
;i" de 1’ enresis "3 IHPUT"Bectier ch 

core Une fois 2 $ 

1894 IF LEFT# choix, 1os"n" THEM RETURH ELSE GOTO 1F44 


Explication du programme: 


1700-1730 


1740-1750 


1760-1770 


1780 


1790-1800 


1810 


1820 


1830 


1840-1850 
1860-1870 


1880-1890 


Variables 


criteres 
lettres 


cherchef 


En-tête du module 

Entrée des informations concernant le critère de 
recherche 

Informations pour l'utilisateur 

Les lettres significatives du critère de recherche sont 
affectées à la variable cherches 

Ouverture de la boucle de recherche 

Les divers contenus du fichier sont affectés à la 
variable aides 

Les lettres significatives des contenus du fichier sont 
affectées à la variable trouves 

Si cherche$=trouve$, la donnée recherchée a été trouvée 

Fermeture des deux boucles 

Si le programme n'est pas sorti des boucles, c'est que 
la donnée recherchée n'a pas été trouvée. Un message 
l'indique. Vous pouvez ensuite faire rechercher une 
autre donnée ou retourner au menu 

C'est ici que le programme saute si la donnée recherchée 
a été trouvée. Le critère de recherche aînsi que les 
numéros des champ et enregistrement où il a été trouvé 
sont affichés. Vous pouvez alors faire faire une autre 


recherche ou retourner au menu 


employées : 
Critère de recherche 
Nombre de lettres significatives 


Lettres significatives du critère de recherche 
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aides Variable auxiliaire à laquelle sont affectés les uns 
après les autres les divers contenus du fichier 

trouves Lettres significatives des données du fichier à comparer 
avec cherches 

enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 


choix$ Décision oui/non 


Améliorations possibles: 

11 n'est pas nécessaire d'améliorer la xoutine de recherche qui 
est parfaitement adaptée au CPC 464 et travaille très Vite, pour 
une routine BASIC, même avec des masses importantes de données. 
Vous pourriez par contre faire afficher non pas simplement les 
numéros de champ et d'enregistrement de la donnée recherchée mais 
l'enregistrement complet avec le contenu de tous ses champs. Ceci 


est à la portée de tous les programmeurs, y compris les débutants. 


Mode d'emploi de ce module: 

Vous devez entrer d'abord le critère de recherche puis le nombre 
de lettres significatives. Lorsque le programme a trouvé le 
critère de recherche, 41 affiche les numéros de champ et 
d'enregistrement correspondants. Vous pouvez ensuite, comme pour 
les autres modules, indiquer si vous souhaitez effectuer une 


o') ou retourner au menu. 


nouvelle recherche {touche 
S1 le critère de recherche n'a pas été trouvé, le programme vous 


l'indique et vous pouvez également indiquer si vous souhaitez 
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’o’} où retourner au 


effectuer Une nouvelle recherche (touche 
menu. [1 peut être intéressant, si votre critère de recherche n'a 
pas été retrouvé d'effectuer une nouvelle recherche avec Un nombre 
inférieur de lettres significatives. Ceci peut en effet vous 
permettre de retrouver la donnée que Vous cherchez même si vous 
aviez fait Une légère faute de frappe lorsque vous l'aviez entrée. 
11 existe d'autre part dans le commerce des programmes comprenant 


des routines de recherche avec une certaine "tolérance d'erreurs" 


mais ces programmes sont en général très onéreux. 
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MODULE 8 -IMPRIMER LE FICHIER- 


Ce module vous permet de faire imprimer votre fichier. 


1308 CLS 

1914 PRINT STRIHGSE ESA, ; 

1924 PRINT" IMFRIMERE LE FICHIER" 
1954 PRINT STRING RE, Met 

1949 LOCATE 5.14: PRINT" Meui 
1259 FOR enregissi TO her 
1969 FOR chambssi TO HchamP 
1974 PRINTÉES, contenu champs enregis à 
1989 HMEXT champs 

1994 HET enreais 

2aaa PRINT: INPUT "You lez 
2814 IF LEFTS& choix@. 1: 









ez patienter pendant l'impression du fichier." 





Explication du programme: 


1900-1930 En-tête du module 
1940 Message à l'utilisateur 
1950-1990 Boucle d'impression des données 


2000-2010 Possibilité d'imprimer à nouveau ou retour au menu 
Variables employées: 


enregis Nombre d’enregistrements du fichier 
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champs Nombre de champs du fichier 
henregis Conserve le nombre d’enregistrements 


hchamps Conserve le nombre de champs 


Améliorations possibles: 

La routine actuelle est relativement simple: les données du 
fichier sont imprimées les unes après les autres sans aucun 
format. 

Une impression formatée afficherait par contre les numéros de 
champ et d'enregistrement ainsi que les noms des champs. Une telle 
impression devrait également prévoir des espaces entre Îles 
différents enregistrements. Ces modifications sont assez simples à 
réaliser grâce à l'excellente instruction PRINT USING de votre CPC 
464. Nous vous conseillons de lire attentivement la section de 
votre manuel qui est consacrée à cette instruction, ceci vous 
épargnera beaucoup de travail de manipulation avec les fonctions 


alphanumériques (right$, left$ ...). 


Mode d'emploi de ce module: 


Le mode d'emploi de ce module ne présente aucune difficulté, il 


vous suffit de répondre aux messages de votre programme. 
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F3 DM) in 


MODULE 9 -FIN DU PROGRAMME - 


Ce module vous permet de mettre fin au programme. 





LL 

FRIHT STRING ERSE, MU 

FRIHT" FIH CR PROGRAMME" 
FRINT STRIHGSE SSD, Mt 

LOCATE 5.14: IHPFUT'"'Ete 





Explication du programme: 


2020-2050 En-tête du module 
2060 On vous demande de confirmer que vous voulez bien mettre 


fin au programme. Si "non", vous retournez al menu 


Variables employées: 


b$ Décision oui/non 


Améliorations possibles: 


Les seules améliorations possibles concernent la présentation. 


Mode d'emploi de ce module: 

Le mode d'emploi de ce module ne présente pas non plus de 
difficulté, ïl vous suffit soit de confirmer que vous voulez 
mettre fin au programme, soit d'indiquer que vous souhaitez 


revenir au menu. 
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vous certain de vouloir mettre fin au Prosramme":;b$: 
F LEFT#b$,1="co" THEN EMD ELSE RETLURM 


MODULE 10 -SUPPRIMER LE FICHIER- 


Ce module vous permet de supprimer des données. Ceci est très 
utile pour vous permettre d'actualiser votre fichier en remplaçant 
des enregistrements dont Vous n'avez plus besoin par de nouvelles 
données. I1 faut bien sûr toujours être prudent quand on utilise 
ce genre de routine car il est toujours plus rapide de supprimer 
une donnée que de la réinscrire. À cet égard, il est bien sûr très 
intéressant de faire imprimer Votre fichier avant de supprimer des 
informations ce qui vous facilitera le travail si Vous supprimez 
par erreur des Ainformations dont finalement vous avez toujours 


besoin. 


Explication du programme: 

2070-2120 En-tête du module 

2130-2140 Vous choisissez Un des sous-modules 

2150-2200 Routine de suppression de toutes les données avec 
l'instruction CLEAR après vous avoir demandé 
confirmation 


2820-2230 En-tête du sous-module 


eeh40 Entrée du numéro de l'enregistrement à supprimer 
2850 Ouverture d’une boucle de suppression des chumps 
2260 Suppression des données par affectation de chaînes vides 


aux variables de contenu 
e270 Fin de la boucle 
2280-2290 Vous choisissez entre supprimer Un autre enregistrement 


et retourner uu menu 
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Variables employées: 

enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d'enregistrements 

hchamps Conserve le nombre de champs 

contenu#${champs ,enregis) Tableau à deux dimensions contenant 
les données du fichier 


choix$ Décision oui/non 


Améliorations possibles: 

Il n'y a pas d'améliorations essentielles à apporter en ce qui 
concerne la suppression complète du fichier. Vous pouvez toutefois 
améliorer la présentation et l'ergonomie de ce module. Par contre, 
en ce qui concerne la suppression sélective, il serait intéressant 
de pouvoir ne supprimer qu'un seul champ d’un enregistrement. Vous 
pourrez certainement réaliser ussez aisément cette modification en 
permettant à l'utilisateur d'indiquer Île muméro du champ à 
supprimer s’il ne veut pas supprimer la totalité de 


l'enregistrement. 


Mode d'emploi de ce module: 


Vous devez tout d’abord indiquer si vous voulez une suppression 


complète ou sélective de données. 
Si vous choisissez la suppression totale, le programme vous 
demande confirmation. Si Vous entrez Un "o" les données sont 


supprimées, sinon vous êtes ramené au menu. 
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Si vous choisissez la suppression sélective, vous devez entrer le 
numéro de l'enregistrement à supprimer. L'enregistrement une fois 
supprimé, vous pouvez choisir entre une nouvelle suppression et le 


retour au menu. 


4 CLS 


GS PRINT STRIHG&E 250, "00 


A LOCATE 14,14: PRINT" Ana Lat io 


PRIHT" AHHULATIOH" 


FRIHT STRINGS: 





in totale 
HT genres 






LOCATE 19,11:FRIHT'"'Annultati 
LOCATE 14,14: IHPUT'Sotre © 
IF choix$g="2" GOTO 2215 








G CLS 
5 PRINT" Annulation totale" 





PA PRINT" : 





Leg 
ecra 
et) 
En) 


A FÜR Chatbà =i TO hcha 





LOCATE 5.14: IHPUT'Etes-vous certain de vouloir tout supprimer ";choirs$ 
IF LEFTS choix S l'etat THEH CLERF 


a GOTO SA 


CLS 
PRINT "Air l a 


nn d'un ere rent 





LOCATE 5.14: 1IMNPUT'"'Quel thoaietrenant Voulez-vous supPrimer entre gis 





cantenu$é chamts.enre 
MEXT champs 

LOCATE S1S: INPUT" Moutes-wons suPPrimer un autre enretistrement "ichoix 
IF LEFT$#choixé.liz"o" THEN GOTO 2214 ELSE RETURH 
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7.3 TRAITEMENT DE TEXTE 


Nous vous fournissons dans ce chapitre un second programme 
constituant une application de type professionnel grâce auquel 
votre CPC 464 pourra être plus qu'un simple moyen de Vous initier 


à l'informatique, un véritable outil de travail. 


11 s’agit d’une autre application classique depuis de nombreuses 
années des ordinateurs, le traitement de texte. Ce programme vous 
permettra notamment de sauvegarder sur cassette les textes que 
vous avez tapés, de façon à ce que Vous puissiez plus tard les 
consulter, les modifier ou les compléter et bien sûr également les 
imprimer. L'intérêt du traitement de texte par rapport à dla 
machine à écrire est bien sûr également de vous permettre de 
modifier à l'écran toute faute de frappe, sans laisser aucune 


trace lors de l'impression. 


Nous ne nous étendrons pas plus longuement sur les avantages 
considérables que présente le traitement de texte mais nous sommes 
persuadés que vous les découvrirez très Vite dès que Vous serez 


familiarisé avec ce programme. 


Si notre programme ne peut pas d’une manière générale rivaliser 
avec les traitements de texte commerciaux existant sur d’autres 
ordinateurs, mous pensons qu’il est néammoins très utile et que 
notamment le module d'entrée du texte est assez réussi puisque 
vous pouvez entrer Votre texte librement en n'importe quel endroit 


de l'écran ce qui n'est normalement pas le cas pour des programmes 


BASIC de cette taille. 
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Comme pour la gestion de fichier nous vous fournissons des 
explications et commentaires détaillés pour chaque partie du 
programme de façon à ce que Vous puissiez d’une part utiliser 
aisément notre programme et d'autre part y apporter les 


modifications que vous souhaitez. 
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MOOULE 1 -MEHU- 


Le menu vous présente les différentes fonctions dont disrose le 
programme en sssociant un numéro & chacune de ces fonctions. Pour 
sélectionner Une fonction, vous tapez le numéro Corresmondant Puis 
Vous spouvez sur EHTER, Chaque fois que vous savez fini d'utiliser 
une fonction quelconque du programme LOous êtes à MOuUVeau ramené au 


mer. Vous pouvez alors indiquer à l'ordinateur d'exécuter une 


autre +téhche. 










FRERREEEEEREEE 
RACE ER RE EEE EEE EEE ELE EE EEE EE HER EEE 


12,7: PRINT" CUP RLCHT 4 Ev CATA BECKER 
. 13,14: ERINTE ME 









Loc ATE HT" Lme rireètr 





LOCATE 15 PRINT"Fin du € 
4 FÉIHT: PRIT: JHPUT bots cho £ 
SG OH a GOSUR 264.6 1. 1415, 1GA0, A, LA, 15 
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Exrlication du prost-armrme 


14-24 Indication du  copsriaht ainsi que du ruméra de la 





on Au programme 


34 C'imensicnnement des variables devant contenir le texte 
144 F: en Made 





114-259 Edition de la r menu avec l'instruction locate 





L46 On ous demande de choisit une des +fonctions du 
CETTE ET ETES 


ei) Saut & ls routine que vous avez choisie 


3 


Humér du module du programme sélectionné 





d'emeloi de ce module: 








du module sélectionné et sppurez sir ENTER, 
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390 


494 
414 
428 
439 
44g 
450 
469 
47a 
434 
4939 
594 
519 
520 
3354 
549 
359 
569 


MODULE 2 -CREATION DU TEXTE- 


Ce module vous permet d'entrer votre texte. 

Vous pouvez entrer Votre texte librement en utilisant le clavier 
de votre ordinateur comme celui d'une machine à écrire. Le curseur 
[un petit point} vous indique où s'affichera le prochain 
caractère. Vous pouvez déplacer ce curseur avec les touches de 


contrôle du curseur. 


CLS 

PRIMT STRING: 450, "05 

LOCATE 15.3: FRINTREATIUOUH EL TEXTE" 

PRIHT STRING LS, "0 

LOCATE 14.14: INPUT" Comment doit s'appeler le texte "onomtentef cu 
CLS 


lignesl coton 
FLOT colonne 


a$ 





sinkey$:if a$="" goto 330 


plot colonne#8+8,400-1igne#16+86,1 


if 
if 
if 
if 


IF 
IF 


IF 


a$=chr$(13} goto 470 
a$=chr$(93} goto 630 
a$=chr$l2#0} goto 510 
af=chr$i241) goto 540 
a$=CHRéc 42 GOTO SFA 
3$=CHR$C 243: GOÜTO 44 


colonnezcolonneti 


colonne=5à THEN GOTO 654 


contenu$c colonne, ligne =2$ 
LOCATE colonne. 1i9ne:PRINT 4% 
GOTO 33 

colonne=1 


lignesligne+i 


IF 


ligne>24 THEN ligne=sté 


GOTO 336 


ligne=ligne-1 


IF 


ligngeél THEN lisnesi 


GOTA 339 
lignezlignet+i 


IF 


ligneiZ4 THEN lignexdd 


GOTO 339 
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640 
654 
64 
Cri 


IF colonne=zi THEN lignesligne-1:colonmnesgf 
colonnezcolonne-1 


GOTO 334 


IF colonne=3A THEN ligne=liqne+i:colonnesi 
colonnescolonne+i 


GOTA 334 


contenug$c colonne. liane =CHR$: 93) 


GOTO 198 


ligne=liane+i:colonnezi 
IF ligne:24 THEN liane=24 


GOTO 339 


Explication du programme: 


260 
270-290 
300 


330 


340 


360-410 


#20 


Vidage de l'écran 

Edition de l'en-tête du module 

Entrée du mom du texte 

Vidage de l'écran 

Les variables de position ligne et colonne sont 
initialisées à 1. Le curseur se trouve ainsi placé dans 
l'angle supérieur gauche de l'écran. Ces variables 
indiquent ensuite en permanence la position du curseur 
sur l'écran 

Le curseur est placé dans l'emplacement suivant de 
l'écran 

Lecture d’Un caractère entré au clavier 

interrogation respectivement des touches suivantes: 
ENTER, crochet fermé (1) et touches de contrôle du 
curseur. Si vous appuyez sur l’une de ces 6 touches, le 
programme saute à la routine correspondante 


La Valeur de la variable colonne est augmentée de 1 pour 
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430 


440 


450 


460 


470-500 


510-530 


540-560 


570-690 


600-620 


qu'elle corresponde à la nouvelle position du curseur 
Saut à une routine spéciale si la dernière colonne (80) 
est atteinte 

Le caractère qui a été entré et placé dans a$ est 
transmis à la variable contenu$lcolonne,ligne) 
correspondant à l'emplacement du curseur 

Affichage du caractère dans l’emplacement de l'écran qui 
convient 

Retour pour lire le prochain caractère 

Routine de traïîtement de la touche ENTER. Si vous 
appuyez sur cette touche, le curseur saute au début de 
la ligne suivante. La ligne 490 contrôle qu'on ne sort 
pas de l'écran 

Routine de traitement de la touche curseur haut. Si vous 
appuyez sur cette touche, la valeur de la variable ligne 
est diminuée de 1. La ligne 520 contrôle qu’on ne sort 
pas de l'écran 

Routine de traitement de la touche curseur bas. Si vous 
appuyez sur cette touche, la Valeur de la variable ligne 
est augmentée de 1. La ligne 550 contrôle qu’on ne sort 
pas de l’écran 

Routine de traitement de la touche curseur gauche. Si 
VOUS appuyez sur cette touche, le programme contrôle 
tout d'abord si le curseur ne se trouvait pas en début 
de ligne. Dans ce cas, la Valeur de la variable ligne 
est diminuée de 1 et la variable colonne passe à 80. Si 
ce n'est pas le cas, la variable colonne est simplement 
diminuée de 1 

Routine de traitement de la touche curseur droite. Si 


VOUS appuyez sur cette touche, le programme contrôle 
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tout d’abord si le curseur me se trouvait pas en fin de 
ligne. Dans ce cas, la valeur de la variable ligne est 
augmentée de 1 et la variable colonne passe à 1. Si ce 
n'est pas le cas, la variable colonne est simplement 


augmentée de 1 


630-640 Routine de traitement de la touche crochet fermé (11. Un 
caractère est tout d’abord ajouté dans le dernier 
emplacement du curseur de façon à ce que la fin du texte 
puisse être plus tard localisée. Puis le programme saute 
au menu 

650-670 Routine de passage à la ligne lorsque vous arrivez en 
écrivant en fin de ligne. La ligne 660 contrôle qu'on ne 
sort pas de l'écran 

Variables employées: 

nomfich$ Nom du texte 

ligne Numéro de ligne actuel du curseur 

colonne Numéro de colonne actuel du curseur 

a$ Contient le dernier caractère entré 

contenu$lcolïlonne,ligne) Contient tout le texte, chaque 


lettre étant définie par ses numéros 


de colonne et de ligne 


Améliorations possibles: 


La routine d'entrée n’a pas en fait à être améliorée notablement. 


Tout au plus pourrait-on essayer d'utiliser plus de touches de 


contrôle, 


les touches DEL et CLR par exemple. On pourrait par 


exemple avoir une touche qui efface tout le texte à l'écran. 
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11 serait cependant possible d'apporter une amélioration 
substantielle en ce qui concerne la longueur possible du texte. 
Pour le moment le texte ne peut comporter que 24 lignes. Il serait 
donc possible de donner une dimension supérieure à la variable 
contenu$ ainsi qu'à tous les paramètres actuellement fixés à 24. 
11 faut cependant faire attention à ne pas surcharger la mémoire 
de l'ordinateur. 11 faudrait également, et c'est déjà plus 
difficile, modifier en conséquence les routines de modification et 


d'examen du texte. 


Mode d'emploi de ce module: 

Vous devez tout d’abord entrer le nom du texte (lettre à X, lettre 
d'affaire du 2.3.1998, etc...}. Vous Vous trouvez ensuite dans la 
page d'entrée. Vous pouvez alors entrer votre texte tout à fait 
normalement et utiliser les fonctions suivantes: ENTER pour passer 
au début de la ligne suivante, les touches curseur pour déplacer 
le curseur sur toute la surface de l'écran et enfin crochet fermé 
pour sortir du module d'entrée du texte et retourner au menu. Nous 
vous invitons cependant instamment à ne pas utiliser la touche 
crochet ouvert que nous avons Utilisée comme marque automatique de 


la fin du texte entré. 


Les touches DEL et CLR n'ont pas de fonction dans la version 
actuelle du programme mais elles peuvent produire des caractères 
indéfinis si vous les utilisez en liaison avec la touche SHIFT. 
Dans ce cus, il vous suffit de ramener le curseur sur ces 
caractères indésirables et de les effacer avec la touche espace ou 


avec tout autre caractère. 
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MODULE 3 -EXAMINER LE TEXTE- 


Ce module vous permet de consulter à l'écran le texte se trouvant 


en mémoire. Ceci Vous permet notamment de consulter un texte que 


Vous Venez juste de charger en mémoire et dont vous ne 


rappelez pas exactement mais aussi pur exemple, si vous placez 


Votre moniteur dans la vitrine de votre magasin, d'afficher un 


texte publicitaire. Songez que dans ce dernier cas il vous sera 


tres aisé de modifier régulièrement le texte ainsi exposé. 










Bt 


ts 

FRIHT STRIMORE AT, 
LOCATE 15,2: FRIHT" EX AWIHER LE TEXTE" 
PRINT STRIHGSE 450 d 

LOCATE 14,164 :FF 
[e PAR EE) 


So à 











ex Une touchée Four 







miner Le texte" 





D DU 


£ 
FF lignezl TI 4 

FOR colonnezl TO 54 
a$econtenige cola 
IF ags"" 
IF 3 







Ge UTIT LE 
ATE one Ida BRENT a$ 


“ caler 


CALL 


BA GIE Lt 
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Explication du programme: 


680 Vidage de l'écran 
690-710 En-tête du module 


720 Message à l'utilisateur 


730 Routine qui arrête le programme jusqu'à ce que vous 


appuyiez sur Une touche 


740 Vidage de l'écran 

750-760 Ouverture de la boucle permettant d'appeler tous les 
emplacements de l'écran 

770 La variable a$ reçoit tous les caractères entrés 

780 Interroge si l'emplacement de l'écran est vide. Si oui, 
Un caractère espace y est affiché 

790 Interroge s’il s’agit du caractère EOF (fin du texte). 
Si oùi, fin de l'édition 

795 Intégration du caractère espace dans le texte 

800 Affichage du caractère actuel dans l'emplacement qui 
convient 

810-820 Fermeture de la boucle 

830 L'écran est figé tant que vous n'appuyez sur aucune 


touche. Dès que Vous appuyez sur une touche, 
menu 


840 Retour au menu 


Variables employées: 

ligne Comme au module précédent 
colonne Comme au module précédent 
a$ Comme au module précédent 


contenu$ Comme au module précédent 
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retour au 


Mode d'emploi de ce module: 

Vous devez appuyer sur Une touche comme Un message vous y invite. 
Vous voyez alors le texte apparaître à l'écran et Vous n'avez plus 
qu'à appuyer à nouveau Sur Une touche dès que Vous souhaitez 


revenir au menu. 


Nous vous conseillons Vivement de toujours appeler cette routine 


lorsque vous Venez d'entrer Un texte et avant de faire appel à 


toute autre fonction. 
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pe QUO NO QD M 
SUR UTEUN 


EE 





D 


A PRINT STRIHGS 


MODULE 4 -MODIFIER LE TEXTE- 


Ce module vous permet de modifier votre texte. Nous Vous invitons 
à lire dans l'explication du programme quelle technique nous avons 


employée pour économiser le plus de place en mémoire possible. 





CLS 
FRIHT STRINGS$CESA, L 
LOCATE 15,3:PRIMT" MADIFIER LE TEXTE" ., 





LOCATE 14.14:P HT"FraPhez une touche Pour madifier le texte" 
CALL 46618 
CLS 


FÜR lignesi TO 4 


1 FOR colonnesl TO 54 


a$=contenaS$é colonne, Ligne 2 










IF a$="" THEN a$= CHR 
IF a$g=CHeS 311 THEH GOTO 1244 
LOCATE colonne, Ligne: PRINT a$ 
HEST colonne 
MENT li 

A GOTO EX 
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Explication du programme: 


850 
860-880 
890 
900 
910 
920-990 


1000 


Vidage de l’écran 

En-tête du module 

Message à l'utilisateur 

Le programme attend que vous appuyiez sUr une touche 
Vidage de l'écran 

Routine d'édition du texte à l’écran 

Saut à la routine d'entrée du module "CREATION DU 
TEXTE". En effet la modification du texte ne nécessite 
aucune fonction qui ne nous soit pas déjà offerte par le 
module d'entrée du texte. I1 n’y a donc aucune raison de 
ne pas réutiliser cette routine. 

Nous vous conseillons de toujours concevoir votre 
programme de façom à ce que le plus grand nombre de 
routines possible accomplissent des tâches suffisamment 
générales pour pouvoir être appelées par diverses 
parties de Vos programmes. En effet ceci vous permet de 
gagner de la place en mémoire mais également de gagner 
beaucoup de temps lors du développement de votre 
programme. Car d’une part Vous avez alors moins de 
lignes à taper et d'autre part, moins Vous avez de 
routines différentes dans vos programmes, moins vous 
perdrez de temps lors du dépistage des erreurs qui 
constitue certainement la partie la plus longue et la 
moins agréable du travail de programmation. Cette 
technique est utilisée de manière systématique par les 
programmmeurs professionnels pour qui le temps de 


programmation représente bien sûr de l'argent. 
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Variables employées : 


Ce sont les mêmes variables que pour les modules précédents. 


Améliorations possibles: 

Les améliorations possibles ne seraient pas nécessairement simples 
à natise en oeuvre et mous vous conseillons de ne vous ÿ attaquer 
que si vous êtes sûr d'avoir bien compris la structure et le 
fonctionnement de l'ensemble du programme. 11 s'agirait 
essentiellement de permettre des ôinsertions de texte où des 
suppressions par Une seule commande de mots ou de phrases entiers. 
Le fait que le texte soit stocké dans Une seule variable ne rend 


pas celà trop difficile. 


Mode d'emploi de ce module: 

Vous devez d'abord appuyer sur Une touche puis vous voyez 
s'afficher le texte à l'écran. Pour le reste Vous pouvez vous 
reporter au mode d'emploi du module "CREATION DU TEXTE". Vous 
n'avez donc plus qu'à amener le curseur sur les endroits où vous 
avez fait des fautes de frappe et à réécrire les caractères 


corrects par dessus les lettres erronnées. 
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MODULE 5 -SUPPRIMER LE TEXTE- 


Ce module vous permet de supprimer Votre texte si vous vous 
apercevez après l'avoir consulté grâce au module précédent qu’il 


vous est finalement inutile ou qu'il est entièrement à repenser. 





OL 
PRINT STRIHGS A, "-" 
LOCATE 15:3:FRIHT" EUFFRIMER LE TEXTE" 





PRINT STRIHGSE HS, M" 


LOCATE S.14:INPUT'"'Etes-vous certain de “ouloir suFPrimer le texte"ichois 





IF LEFTS$C cho 
GOTA 14@ 
RUH 


#$, 1aus"o" THEN CLEAR:GOTO 1474 


Explication du programme: 
1010 Vidage de l'écran 


1020-1040 En-tête du module 


1050 Vous devez confirmer Votre décision de supprimer le 
texte 
1060 La variable CLEAR supprime le texte 5i vous avez répondu 


"o". Le programme saute en 1070 

1065 Si vous me voulez plus supprimer Votre texte, le 
programme saute au menu 

1070 C'est ici que saute le programme si vous avez supprimé 
votre texte. Le programme est relancé pour que soit 
redimensionnée la variable contenu$ qui a été détruite 


par l'instruction CLEAR 
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Variables employées: 


[1 n'y pas ici d'améliorations essentielles à apporter si ce n'est 
en ce qui concerne la présentation. La possibilité de supprimer 
uniquement des parties de texte serait également intéressante mais 


relève plutôt du module modification. 


Mode d'emploi de ce module: 


Vous pouvez confirmer votre décision de supprimer le texte en 


entrant "o" ou retourner au menu en entrant "n". 
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MODULE 6 -SAUVEGARDER LE TEXTE- 


Ce module vous permet de sauvegarder Votre texte sur cassette. I1 
s'agit là d’un des éléments principaux du programme car la 
possibilité de conserver des textes sous cette forme constitue le 
principal avantage du traitement de texte par rapport à la machine 
à écrire. Vous pouvez en effet, de ce fait, tirer autant 
d'exemplaires que Vous voulez de Votre texte quand vous le voulez. 
Vous pouvez conserver des modèles de lettres types (factures, 
changement d'adresse, curriculum vitae, etc...) que vous pouvez 
ensuite adapter très aisément à différents correspondants, etc... 
Le traitement de texte constitue d'autre part un mode d'archivage 


très économe en place. 


Explication du programme: 


1080 Vidage de l'écran 


1090-1100 En-tête du module 


1120 Message à l'utilisateur 
1130 Le programme attend que Vous appuyiez sur Une touche 
1140 La vitesse d'écriture est augmentée pour que la 


sauvegarde ne prenne pas trop de temps. Si vous 
n'utilisez pas des cassettes de bonne qualité 1 
vaudrait mieux supprimer cette instruction de façon à ce 
que vos textes me soient pas perdus. Il n’est cependant 
pas recommandé d’utiliser d’une manière générale des 
cassettes de mauvaise qualité. Le mieux est d'éviter 
d'acheter les cassettes les plus chères ou les moins 
chères et de s’en tenir à des cassettes audio ordinaires 


ou bien à des cassettes spéciales informatique 
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1150 Ouverture d’un fichier sur cassette avec le nom du texte 
se trouvant en mémoire 

1160-1170 Boucle d'appel de tous les emplacements de l'écran 

1180 La variable a$ stocke successivement tous les caractères 
composant le texte 

1190 Le contenu de la variable est écrit sur la bande 

1200-1210 Fermeture de la boucle 


1220 Fermeture du fichier 


Variables employées : 


ligne Comme précédemment 
colonne Comme précédemment 
a$ Comme précédemment 


contenu$ Comme précédemment 


nomtexte$ Nom du texte 


Améliorations possibles: 

11 n'y a pas ici d'améliorations essentielles à apporter. Vous 
pouvez toutefois améliorer la présentation et l'ergonomie de ce 
module. Vous pourriez également permettre à l'utilisateur de 
choisir entre les deux vitesses de stockage du texte et lui 
demander, une fois la sauvegarde effectuée s’il souhaite procéder 


à une seconde sauvegarde. 


Mode d'emploi de ce module: 


Une fois que vous avez choisi ce module, vous devez appuyer sur 


une touche. Le programme ouvre alors un fichier d'écriture sur la 
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1986 
1999 
1199 
1119 
1124 
1139 
1149 
1159 
1160 
1179 
1189 
1159 
1298 
1219 
1229 
1239 


bande, ce qui dure un certain temps. Le message vous invitant à 
appuyer sur les touches PLAY et RECORD du lecteur de cassette 
apparaît peu après. Vous n'avez plus ensuite qu'à appuyer sur une 


touche quelconque pour que lu sauvegarde s'effectue. 


CLS 

PRINT STRING 4, "0 

LOCATE 15,2:PFRIHT" SAUVEGARDER L E TE KT E" 
PRINT STRING LSQ, "0 

LOCATE 14,149:PRINT'"FraPPpez une touche Pour sauvensrder le texte" 
CALL 2EB1S 

SPEED WRITE 1 

OPENOUT nomtexte$ 

FOR lignezi TO 24 

FOR colonnezl TO &g 

aS=contenu$c colonne, ligne à 

PRINTÉ9, 235$ 

NEXT colonne 

HEXT ligne 

CLOSEQUT 

GOTO 144 
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MODULE 7 -CHARGER UN TEXTE- 


Ce module Vous permet de charger les textes que Vous avez 


sauvegardés sur cassette. 


1244 CLS 

125Q FRINT STRIHGSC4SY, "1" 

1269 PRINT" CHARGER LE TEXTE" 
1279 PRINT STRIHGS 256, "0 

1284 LOCATE 18.1G:PRIHNT'"Frappez une touche Pour charaer le texte" 
1299 CALL 2EB1S 

1349 OFENIH nomtexte$ 

131Q FOR lignezi TO 24 

1329 FOR colonnezi TQ 54 

1339 IHPUTE9. 23% 

1349 contenu$ colonne, Liane ïsa$ 

1358 HEXT colonne 

1364 HEXT line 

137@ CLOSEIH 

1364 GOTO 194 


Explication du programme: 


1240 Vidage de l'écran 


1250-1270 En-tête du module 


1280 Message à l'utilisateur 

1290 Le programme attend que Vous appuyiez sur une touche 
1300 Ouverture d’un fichier sur cassette en lecture 

1330 Boucle de lecture des données sur la bande 

1340 Les données lues dans a$ sont affectées à la variable 
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contenu$ correspondant au bon emplacement sur l'écran 
1350-1360 Fermeture des boucles 
1370 Fermeture du fichier 


1380 Retour au menu 


Variables employées: 


ligne Comme précédemment 
colonne Comme précédemment 
af Comme précédemment 


contenu$ Comme précédemment 


Améliorations possibles: 


11 n'y a pas ici d'améliorations importantes à apporter. 


Mode d'emploi de ce module: 

Le message Vous invitant à appuyer sur la touche PLAY du lecteur 
de cassette apparaît peu après que vous ayez sélectionné ce module 
et appuyé sur Une touche. Enroulez la cassette jusqu’au début du 
texte à charger puis appuyez sur la touche PLAY. Vous n'avez plus 
ensuite qu'à appuyer sur Une touche quelconque pour que le 


chargement s'effectue. 
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1338 
144 
141 
1426 
1450 
1449 
1454 
14e 
147 
1459 
1434 
1495 
1540 





MODULE 8 -IMPRIMER LE TEXTE- 


Ce module vous permet de faire imprimer votre texte. 





CLS 

PRINT STRIHGSC ESA, "0 à 

PRINT" IMPRIMER. LE TE4TE" 
PRINT _STRIHGS EE 














LOCATE 14:14: FFINT"Frappez une touche Pour imérimer le texte" 
CALL & 

FOR ligne A 

FOR colonnes TO 

a$=contenuge colonne, Ligne à 

FRINTÉE, 323$; 


HEXT colonne 
FRIHT Fe CHPSE 1 1: CHRSE 14 1: 





ef 
à GOT 18 


Explication du programme: 

1390 Vidage de l'écran 

1400-1420 En-tète du module 

1430 Message à l'utilisateur 

1440 Le programme attend que vous appuyiez sur une touche 

1450-1460 Boucle d'impression du texte 

1470 La variable a$ reçoit successivement tous les caractères 
à imprimer 


1480 Impression d’un caractère 
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1490-1500 Fermeture des boucles 
1495 À la fin de chaque ligne, la tète d’impression est 
ramenée en début de ligne 


1530 Retour au menu 


Variables employées: 

ligne Comme précédemment 
colonne Comme précédemment 
contenu$ Comme précédemment 
a$ Comme précédemment 


choixs$ Comme précédemment 


Améliorations possibles: 

La routine actuelle est relativement simple: les lignes du texte 
sont imprimées les unes après les autres sans aucun format, telles 
que vous les avez entrées. 

Une impression formatée Vous permettrait par exemple de faire 
justifier votre texte, c'est-à-dire de faire rajouter 
automatiquement des espaces à l’intérieur des lignes de façon à ce 
que les bords verticaux de votre texte apparaissent alignés et non 
en dent de scie. C'est aïînsi que le texte que vous lisez a été 


imprimé. 


Ceci n’est malheureusement pas très facile à programmer et d'autre 
part très long en BASIC. Nous conseillons donc uniquement aux 
programmeurs expérimentés de s’y attaquer en créant de préférence 


Une routine en langage-machine à cet effet. 


TT 9- 


Mode d'emploi de ce module: 

Une fois que vous avez appelé ce module, vous devez connecter 
l'imprimante à votre ordinateur et appuyer sur une touche. 
L'impression une fois effectuée vous n'avez plus qu’à indiquer si 
vous voulez Une seconde impression ou si Vous voulez revenir au 


menu. 
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MODULE 9 -FIN DU PROGRAMME - 


Ce module vous permet de mettre fin au programme. 


1540 cils 

1550 print string$(&S0,"-") 

1560 print" FIN D U 
1570 print string$i&s50,"-"} 

1580 Iocate 65,10:input"Confirmez 
1590 if choix$="o" then end else 


Explication du programme: 


1540 Vidage de l'écran 
1550-1570 En-tête du module 
1580 

fin au programme. Si 


Variables employées: 


choix$ Décision oui/non 


Améliorations possibles: 


Les seules améliorations possibles 


Mode d'emploi de ce module: 


Le mode d'emploi de ce module 
difficulté, il vous suffit soit 
mettre fin au programme, soit 
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"non", 


PROGRAMME" 


lo/n)";choixs 
goto 100 


On vous demande de confirmer que vous voulez bien mettre 


VOUS retournez au menu 


concernent la présentation. 


ne présente pas non plus de 


de confirmer que vous voulez 


d'indiquer que vous souhaitez 


revenir au menu. N'oubliez pas que 51 Vous mettez fin au 
programme, tout texte en mémoire que vous n’auriez pas sauvegardé 


sur cassette sera détruit. 
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7.4  ATTRAPEZ LA BOMBE 


Comme Vous n'allez certainement pas Utiliser Votre CPC #64 
uniquement pour de difficiles travaux, nous avons pensé que vous 
seriez heureux de trouver les deux jeux que nous vous fournissons 
en guise de conclusion de cet ouvrage. Notre premier jeu s'appelle 
“attrapez la bombe" et son principe est tellement simple que vous 
le comprendrez dès l’abord mais Vous verrez Vite qu'il n’est pas 


aussi facile de gagner que vous pourriez le penser à première vue. 


11 s'agit d'attraper avec un wagonnet les bombes qui tombent du 
ciel. Si vous attrapez la bombe Vous marquez Un point, sinon vous 
perdez un point. Vous pouvez déterminer au début du jeu la vitesse 
de chute des bombes et le nombre de bombes que vous allez devoir 
attraper. 

Vous déplacez le wagonnet avec les touches curseur gauche et 


droite. 


Faîtes bien attention en ligne 180 à bien entrer deux espaces 


après l'instruction PRINT. 


La meilleure Vitesse pour commencer est 0.5. Mais si Vous aimez 
vivre dangeureusement, vous pouvez choisir une Vitesse supérieure 


à 2. 


11 vaut mieux ne pas interrompre le jeu avec la touche ESC car 
nous avons diminué le délai de répétition des touches et vous 
aurez beaucoup de mal à contrôler Votre ordinateur. Attendez 


plutôt la fin d’une partie. 
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Encore Un conseil pour les lecteurs très courageux: si vous 


modifiez la ligne 160 ainsi: 


160 d=1:anf=int{rndl 1)1#301) 


et la ligne 260 ainsi: 


260 1F ko)>30 THEN ko=30 


VOUS Verrez que les bombes tomberont sur Une encore plus grande 
largeur horizontale ce qui rend leur “capture” encore plus 


difficile. 


Vous pouvez bien sÛr apporter autant de modifications que vous le 
souhaitez à ce petit programme, notamment en améliorant le 
graphisme de l'arrière-plan ou en ajoutant des effets sonores. 11 
serait également intéressant de créer des caractères redéfinis 
vous permettant de montrer la bombe qui explose. Vous pourriez 
alors déplacer ces caractères sur l'écran avec l'instruction 


LOCATE lorsque la bombe n'a pas été attrapée. 
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19 REM attraPpez la bombe 
29 MODE 1 
32 SYMEOL 






da SYMEOL 55.12 ! 1.28, 

59 STMEOL 53.1. rè 6 

ER SYMEOL 689,4. 8 

74 S'YMBQOL 61.255: +253: 5, 299: 249 
8@ IHPUT"'sitesse de chute"ifs 

94 IHPUT'Hombre de bombes" 


144 SPEED KEY 1.1 
114 CLS 

124 ko=i@ 

134 FOR bombes=1 TO bo 
144 CLS 

154 LOCATE 1.28: PRINT STRINGSE ELZE, Mat 

166 del:anfelINTE RMC 1 HETE 141 

174 LOCATE anf:d'FRINT" 

18@ LOCATE ko. Z1:FRINT" ii" 

194 LOCATE anf:d+fa:PRINTME" 

24g LOCATE ko Z1:PRIHT" 

214isd+f a 

224 IF INTidi»<54 THEN GOTO 254 

234 in$=INKETS . 

244 koskoté 1 AND inBeCHRSe PAT ee 1 AND ing=CHR$é d4z 3 
8S4 IF koïl THEH kost 

266 IF kosZ5 THEH kozes 

zrà GOT 174 

289 IF ko=ant OR anfsko+i THEH tretr+l 

294 IF koéranf AND k nf-1 THEH trstr-1 

344 HEXT 

318 ÊLS 

324 SPEED KEY £f,35 

334 LOCATE 15.14: PRIHT'ECORE. "Er 

344 LOCATE 18. 20:FRIHT "encore une fois?" 

354 INPUT a$ 

364 IF a$="o" THEH FUH 

Srû SFEED KEY 24,3 
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7.5 LA BATAILLE NAVALE 


Voici le deuxième jeu que nous vous avons concocté. Contrairement 
à ce que le titre pourrait faire penser, 11 ne s’agit pas de la 


millième Version de ce jeu très connu. 


Vous devez tout d'abord entrer certains paramètres: 


- le niveau de difficulté du jeu qui doit être compris entre 0 et 
2. Les niveaux 0, 1 et 2 correspondent à des écrans de 20, 40 ou 
80 colonnes. Le niveau 0 est le niveau le plus agréable sur le 
plan de la qualité du graphisme mais c'est bien sÛr aussi le 


plus facile. 


- l'unité de temps. Il s’agit du temps dont Vous disposez pour 
exécuter votre tâche. Plus ce paramètre est petit, plus votre 
tâche sera difficile car Vous disposerez de moins de temps pour 


l'accomplir. 


- la vitesse de déplacement de la bombe sur l'écran 


- le nombre de bombes avec lesquelles vous voulez jouer 


Il est maintenant temps que nous vous expliquions le but du jeu: 


Une fois que vous avez entré les paramètres ci-dessus, l’image du 


jeu apparait. Vous Voyez d’une part Un bateau ennemi avec un 


canon, d'autre part Un sous-marin et Une bombe à côté de ce sous- 


marin. Votre tâche consiste à déplacer la bombe avec les touches 


curseur et à l’amener sur le pont du bateau ennemi pour détruire 
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celui-ci. Si vous détruisez le bateau dans le temps qui vous est 
imparti, Vous marquez des points, sinon l'écran de jeu suivant 
apparaît. 

A la fin du jeu apparaît une notation de votre prestation qui 
tient compte du nombre de bateaux touchés, du temps que vous avez 


mis, du niveau de difficulté et de la vitesse de la bombe. 


Vous pouvez bien sÛr améliorer ce jeu à Votre guise en améliorant 
le graphisme et les effets sonores. Vous pourrez certainement 


puiser de précieuses idées dans les chapitres 2 et 3. 


19 NODE 2 

15 touches=@ 

29 SYMBOL AFTER 32 

34 LOCATE 29.180:FRINT'EATAILLE HAYALE" 

49 GOSUE 3509 

S4 LACATE 1,15:INPUT'Quel niveau de difficulte C@-Zz02";a 

68 INPUT"Combien d'unites de temPs Pour diriser une bombe"il .} 
78 IHPUT'Vitesse de 1a bombe"ivitesse 

88 IHPUT"Combien de bombes" bombes 


85 DIM 


bolé bombes à 


9a MODE 3 


95 FOR 
96 CLS 
1aa IF 
11@ IF 
120 IF 
134 JP= 


148 xF= 
154 3FZ=TINTE RNDI 1 2 
F2 IMTÉ RHOC 1 #8 141 





176 IF 
Pl xXPRS 


bbz1 TO bombes 


a THEN f=18 
a=1 THEN F235 
a=2 THEN f=75 
INTCRNDE 1 #24 3+2 
IHTÉ HD LP 141 

25 +1 
















xP=XP2 OF uPæuP2 THEN GOTO 156 
#P2+3:4PI=UPE 





re bisbkiqa 

175 SPEED KEY l'vitesse 

176 FOR mnnæi TO bi 

189 LOCATE xP+2:9P-1: PRIHTI" 


19@ LOCATE xp: 46: PRINT" 
204 LOCATE xP2 
224 LOCATE xp. 





PE PRINT 
gp: PRINT" 








238 ing IHKE TS 





“up3é1 THEN xp 






xP3>f+2 THEH 
YPS<1 THEH 4F 
9P3525 THEH 4P3=: 


4PSezs AND xP3=f+2 THEN 





318 LOCATE xP3:4P3S:PRINT"S" 


326 IF 


#FSSxP AND yPpäsup THEH GOTO dd 


336 MEXT min 
335 NEXT bb 
348 GOT :44a 


-11 17- 








259 FEM definir ur caractere 

364 SYMBOL 33,62.84.20,29,124, 174,124, 
374 SYMEOL 25,:252,292, 290,2 5,254,292, 
280 SMBOL 37. 1,129.129,298,295, 295,25; 
394 S'Y'MBOL 36,126,15: 15 127, 63,15,31 
406 S''MBOL 91,12£,192,252,8 29° 

41a SYMEUL 33.4.1,31 Æ 

den SYMBOL 94.4,4.156: 





434 RETURN 

44@ MOCE & 

445 touchesstouchest+i 

44 LOCATE 3,12 

447 bolébtosi (blind bi #16 

44£ FOR zeizi TO 13 

449 PRINT CHRSC ZE 4 2: 

45 HEXT 

451 LOCATE 3.I1S:FRINT CHRgc 2234; "T Q UC H E":CHRgC 224 5 
452 LOCATE 3,14 ! 

453 FOR zeizi TO 13 

454 PRINT CHARGE 24 à; 

455 MEXT 

464 SOUND 124,459,154.15,,.15 

465 FOR 1 TO 3904 

466 NEXT xx 
467 MODE à 

4r4 GÜTO 335 

3960 MODE 

3845 FOR Ilzi TO bombes 

3G%é FointesPointe+bolc II 

3047 MEXT 

3QGZ PointsspPointsktouches#e +10 

341A LOCATE IS. S:PRINTLE JEU EST FIM I" 

3924 LOCATE Z.11:PRINT'"Vous avez fait'itouches: "touches sur"ibonbes: bombes: 
3921 LOCATE 2:13:PRINT'YOTRE SCÛRE EST: "3 INTE points 

SPEED KEY 24,3 

















3 SA INPUT'Voulez-vous jouer encore une fois"ichoirsS 
3940 IF choixg="o" THEH FUM 
3454 END 
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